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| AKUSTIK-KOPPLER 
Dataphon s21d, 
300 Baud Modem, 
nach CCITT V.21 Standard, 
m. FTZ-Nr. 18.13.1917.00, 
Gebühren- u. anmeldefrei, 
V24/R5-232 Standard- 
Schnittstelle (25-Pin), 
Vollduplexbetrieb, 
Answer-, Originate-und 


Auto-Modus nur DM 298,00 


TELEKOMMUNIKATIONS-KOMPLETT-PAKET 

| bestehend aus: 

i Dataphon s?1d, 

i Anschlußkabel (RS-232- 
-Schnittstelle zum 
Apple Il-Gameport), 

ı Terminalprogramm 

"HIB MODEM-TRANSFER” nur DM 398,00 


BROTHER-Drucker f. alle Appie-Rechner: 
HR-5 (Thermodrucker, 


V.24 oder Centr.-Interf.) DM 499,00 
M-1009 (Matrixdrucker 
mit V.24 + Centronics) DM 799,00 


HR-15 XL (Typenraddr.) 

mit Centronics-Interface DM 1698,00 
mit V.24-Interface DM 1748,00 
Drucker-Anschlußkabel 

für APPLE //c oder 

Macintosh an: HR-5 (V.24), 


HR-15 (V.24), M-1009 DM 114,00 


INFO-CDUPORN: 








Ich interessiere mich 0 Telekommunikation 

besonders für: O Apple Il - Interfaces 
OD Apple II - Laufwerke 

ABSENDER: OD BROTHER-Drucker 


OD Software für Macintosh 
Bitte senden Sie mir ausfuühr- 
liches Informationsmaterial. 
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7 Telefon: 0911/515 939 - Teletex: 2627 - 911 8253 


LAUFWERKE für den Apple Il 


Sakata-Laufwerk, SFD-155 
(Chinon), I x 40 Track 

(163 K-Byte) komplett 
anschlußf. im Gehäuse DM 
TOSHIBA 2 x 80 Track DM 


AUTO-PATCH-CONTROLLER 
komplett mit Handbuch u. 
Formatierungs-Diskette DM 
DISK-DOPPEL-STATION 

1,2 M-Byte, bestehend aus: 

2 Laufwerke ä 2x80 Track 

im Gehäuse, 1 Auto-Paich- 
Controller mit Handbuch u. 
Formatierungs-Diskette, 


298,00 
648,00 








anschlußfertig nur DM 
SONDERANGEBOT: 
TEAC FD-55F nur DM 598,00 
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INTERFACE-KARTEN Tür den Apple Il 
16 K-RAM-Card DM 129,00 
Disk Interface-Card DM 198,00 
Z-80-Card DM 179,00 
80-Zeichen-Card DM 249,00 
Super Serial Card DM 298,00 
128 K RAM-Card DM 498,00 
IC-Test-Karte DM 398,00 
MICROSOFT-Software für den Macintosh: 
Basic Version 2.0 DM 598,00 
Multiplan deutsch DM 848,00 
Chart (Grafik-Paket) DM 498,00 
Word (prof. Textprogr.) DM 778,00 
File (Datenbank) DM 778,00 


als Komplettpaket nur DM 3298,00 ı 


Alle Preise incl. ges. Mehrwertsteuer. Die Berechnung der Versandkosten erfolgt nach 
Entfernung und Gewicht. Fordern Sie noch heute unsere Gratispreisliste anl 
Wiederverkäufer bitte nur schriftlich anfragen (Kopie der Gewerbeanmeldg beilegen). 








Kein Thema wird momentan heftiger dis- 
kutiert als das Kopierwesen in der EDV- 
Branche, denn zur Zeit versucht die Soft- 
ware-Industrie mit allen ihr zur Verfügung 
stehenden Mitteln (strafrechtlich: Haus- 
durchsuchung, Beschlagnahme usw.; Zi- 
vilrechtlich: Abmahnung, Schadenersatz 
usw.), den Raubkopierern auf den Pelz zu 
rücken. Deshalb beginnt der vorliegende 
Peeker mit einem Feature über Software 
und Kopierrecht, wobei ich aber im Ge- 
gensatz zu manchen anderen Darstellun- 
gen nicht nur für die Software-Urheber, 
sondern auch für die Software-Benutzer 
Partei ergreifen werde, weil teilweise der 
Versuch unternommen wird, aus dem Ur- 
hebergesetz einen für Software geltenden 
Sonderschutz herauszudeuteln, für den es 
de jure keine Grundlage gibt. Das EDV-Ur- 
heberrecht steht aus zwei Gründen auf 
sehr wackligen Beinen: Zum einen ist im 
deutschen Urheberrechtsgesetz das Sog. 
„Computerwerk“ (= Computerprogramm) 
mit keinem Wort erwähnt und damit auch 
nicht gesondert geregelt. Zum anderen 
gibt es fast keine Software-Streitfälle, die 
in Form von Musterprozessen durch alle 
Instanzen geboxt wurden. Deshalb kann 
man in Detailfragen nur Mutmaßungen 
äußern, indem man die Paragraphen „ana- 
log“ auslegt. 

Beispiel: Programmiersprachen 

Prof. Dr. H. Hubmann ist der Meinung, daß 
Computerwerke den Sprachwerken zuzu- 
ordnen sind: „Gleichgültig ist auch, wel- 
che Sprache gewählt wurde, ob die inlän- 
dische oder eine fremde, ob eine lebende 
oder eine tote, ob eine Kunstsprache, wie 
Esperanto, oder eine Computersprache, 
wie Algol usw. („Urheber- und Verlags- 
recht“, S. 90). An anderer Stelle heißt es: 
„Die Methode und Technik des Schaffens 
sowie die vom Inhalt losgelöste Formge- 
bung als solche sind nicht Gegenstand 
des Urheberschutzes; eine Sprache wie 
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Esperanto, eine Schrift wie Stenographie 
oder eine Versform sind nicht geschützt”. 
(2.00). 

Was würde daraus folgen? Wenn Compu- 
terwerke Sprachwerke sind, dann sind 
Computersprachen Sprachen. Da jedoch 
weder Sprachen wie Englisch oder 
Deutsch noch Dialekte wie Hessisch oder 
Schwäbisch Urheberschutz genießen, wä- 
ren auch weder Computersprachen wie 
Pascal oder Basic noch Computerdialekte 
wie Microsoft-Basic oder Wang-Basic ge- 
schützt. Und dies würde konkret bedeu- 
ten: Aus urheberrechtlicher Sicht würde 
jedermann ohne Lizenz Applesoft-Basic 
benutzen dürfen, wie auch jedermann 
Hessisch benutzen darf. 

Man könnte jetzt noch einen Schritt weiter- 
gehen und auch die Betriebssysteme, die 
üblicherweise mit den Programmierspra- 
chen verwoben sind, den Computerspra- 
chen zuordnen. Folglich wären dann Disk- 
Operation-Systems wie CP/M, MS-DOS, 
Apple-Pascal, DOS 3.3 und ProDOS nicht 
urheberrechtlich schutzfähig. Wenn dem 
so wäre, würde dies letztlich einer Sy- 
stemfirma wie Microsoft, die überwiegend 
vom Verkauf selbstentwickelter Program- 
mier- und Betriebssysteme lebt, die Exi- 
stenzgrundlage entziehen, weil jedermann 
die Microsoft-Sprachen unentgeltlich be- 
nutzen dürfte, wie dies ja auch bei Espe- 
ranto der Fall ist. Mit dem gegenwärtigen 
deutschen Urheberrechtsgesetz kommt 
man also hier keinen Schritt weiter. 
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Wenn es in diesen Tagen an der Tür klopft, 
ist es möglicherweise nicht der Briefträger 
(„The postman always rings twice...”, 
Cain). Denn zur Zeit findet eine groß ange- 
iegte Hausdurchsuchungswelle bei mut- 
maßlichen Raubkopierern statt. Polizisten 
stürmen die Studentenbuden in Karlsruhe 
und anderen Informatik-Hochburgen und 
beschlagnahmen neben den vermuteten 
Schwarzkopien auch Apple-Hardware als 
„Raubkopiererwerkzeug“. Dabei soll es 
dem Vernehmen nach zu peinlichen Ver- 
wechslungen gekommen sein. So wurden 
neben den „Händlern“ auch die Käufer 
belangt. Ferner kassierte die Polizei in Un- 
Kenntnis der Sachlage offenbar teils Origi- 
nalprogramme sowie Videobänder, Ton- 
bandkassetten u.a.m. 

Wir sind der Meinung, daß das Kopierun- 
wesen, das inzwischen groteske Formen 
angenommen hat, unbedingt eingedämmt 
werden muß. Es wäre jedoch ratsam, 
wenn man etwas differenzierter vorginge. 
Es genügt nicht, daß man nur die Schüler 
und Studenten anschwärzt und zu den 
Prügelknaben der Nation macht, denn 
auch bei den „offiziellen“ Händlern wird 
zuhauf kopiert. Nur spricht man hier nicht 
von „Schwarzkopien“, sondern verbrä- 
mend von „Sicherungs- und Arbeitsko- 
pien“. 


Aus diesem aktuellen Anlaß befassen wir 
uns nachfolgend in extenso mit der „Ver- 
vielfältigung zum persönlichen Gebrauch” 
(8 53 UrhG) und zeigen auf, was nach dem 
gegenwärtigen Urheberrechtsgesetz er- 
laubt und verboten ist. Als Quellen benut- 
zen wir „Hubmann, Urheber- und Verlags- 
recht, 4. Aufl., Beck-Verlag“ (kurz Hub- 
mann genannt) sowie „Fromm/Norde- 
mann, Urheberrecht, 5. Aufl., Kohlham- 
mer-Verlag“ (kurz Nordemann genannt). 
Die eingestreuten Schaubilder stammen 
aus meinem „Verlagsbuchhändler”, S. 
BErf. 


Zur Einstimmung in das Thema zunächst 
einige Fakten zum Kopierunwesen, die 
unbewiesen in den Raum gestellt werden. 
Haken Sie einmal ab, was Ihnen bekannt 
vorkommt! 

1. Bibliotheken: „Bibliotheken haben in 
den letzten Jahren Fotokopierautomaten 
aufgestellt, mit denen jeder Bibliotheksbe- 
nutzter fotokopieren kann, was und wieviel 
er will.“ (Nordemann, S. 328) 

2. Kopiershops: „Gewerbliche Fotoko- 
pieranstalten fragen ebenfalls nicht nach 
Zweck und Zahl, wenn ihnen Aufträge er- 
teilt werden.“ (Nordemann, S. 328) 

3. Schulen: „In vielen ... Schulen werden 
... aus dem Exemplar der Lehrerbücherei 


Peeker 4/85 


oder gar aus einem kostenlosen Ansichts- 
exemplar ganze Kapitel fotokopiert und im 
Unterricht verwendet.“ (Nordemann, S. 
328) 

4. Computerclubs: Die einschlägigen 
Treffen der AUGE usw. dienen meist we- 
niger dem Erfahrungs- als vielmehr dem 
Programmaustausch, wobei die kopierge- 
schützten Programme mittels „Kopien der 
Kopiergeschützten Kopierprogramme ko- 
piert“ werden. („Der Tag geht zu Ende, 
Johnny Locksmith kommt...” ) 

5. Hardwarehändler: Bei den Händlern 
sind Kopien von Originalprogrammen oft 
Zugaben zur käuflich erworbenen Hard- 
ware („Kommen Sie mal hinter, Hab’ da 
noch was für Sie...”). 

6. Kleinanzeigen: In Kleinanzeigen vieler 
Zeitschriften werden unter Rubriken wie 
„Verkaufe“ und „Tausche“ Kopien von 
Originalprogrammen angeboten. („Wegen 
Systemwechsel zu verkaufen...“). 


1. WAS IST EINCOMPUTERWERK? 


Das „Gesetz über Urheberrecht und ver- 
wandte Schutzrechte“ (= Urheberrechts- 
gesetz = UrhG) vom 9. September 1965 
soll die Urheber von Werken der Literatur, 
Wissenschaft und Kunst in bezug auf ihre 
Werke bis zu 70 Jahre nach dem Tod des 
Urhebers schützen (8 1 UrhG). Das UrhG 
enumeriert in $ 2, Absatz 1 u.a. folgende 
Werkarten: 

@® Sprachwerke 

® Musikwerke 

® Tanzkunstwerke 

® Kunstwerke 

@ Lichtbildwerke 

® Filmwerke 

„Computerwerke“ (= Computerprogram- 
me) werden also nicht gesondert erwähnt. 
Insoweit ist es fraglich, ob Computerpro- 
gramme eine vom gegenwärtigen Gesetz 
noch nicht gesondert erfaßte spezielle 
Werkkategorie darstellen oder den wis- 
senschaftlichen Sprachwerken zu subsu- 
mieren sind. Momentan wird man wohl das 
letztere annehmen müssen, so daß die 
Kopier- und Zitierrecht-Paragraphen, die 
vorwiegend auf wissenschaftliche Sprach- 
werke abheben, analog anzuwenden sind. 
Zumindest dürfte sich der in Druckform 
oder als Datenträger erschienene Queil- 
code eines Programms wegen der verba- 
len Kommentare zweifelsfrei als wissen- 
schaftliches Sprachwerk bezeichnen las- 
sen. In Einzelfällen wird man „Computer- 
werke“ auch den Kunstwerken oder Mu- 
sikwerken zuordnen können, z.B. bei mu- 
sikalisch untermalten Computergrafikpro- 
grammen. 


2 RECHT OR 





1.1. Persönliche geistige 
Schöpfung 


Als Werk gemäß 8 2, Absatz 2 gilt nur die 
„persönliche geistige Schöpfung”: 


Persönlich besagt, daß das Werk von ei- 
ner natürlichen Person erstellt werden 
muß. Mechanisch, automatisch oder com- 
putermäßig hergestellte Produkte sind 
demzufolge keine urheberrechtlichen 
Werke, So ist beispielsweise der mit Hilfe 
eines Assemblers erstellte Quellcode ei- 
nes Programms ein Werk. Ob jedoch der 
auf dem Quellcode basierende Objekt- 
code ein Werk darstellt, ist umstritten, 
denn dieser wird bekanntlich nicht „per- 
sönlich“, sondern „mechanisch“ per 
Knopfdruck erzeugt. Würde man dagegen 
den Objektcode direkt in Maschinenspra- 
che, d.h. ohne Zuhilfenahme eines As- 
semblers schreiben, so würde auf alle Fäl- 
le ein „persönliches“ Werk geschaffen 
werden. Aus urheberrechtlicher Sicht be- 
steht der Quellcode teils aus Befehlskür- 
zeln, die in einer künstlichen Program- 
miersprache formuliert sind, sowie teils 
aus Kommentaren, die in einer natürlichen 
Sprache geschrieben sind. Der aus dem 
Quellcode durch Assemblierung oder 
auch durch Compilierung entstandene 
Obiektcode ist lediglich eine Folge hexa- 
dezimaler Zahlen, die vom Mikroprozessor 
als Maschinenbefehle interpretiert wer- 
den. Eine Zahlenfolge als solche, z.B. die 
dezimale Folge 2, 3, 5, 7, 11, 13...(Prim- 
zahlen), ist nicht automatisch ein Compu- 
terwerk, wie auch eine Tonfolge, z.B. c, d, 
e,f,g, a...(Tonleiter), nicht automatisch ein 
Musikwerk ist. In beiden Fällen fehit die 
„persönliche“ Note. Der Objektcode ist 
zwar formal betrachtet eine „Überset- 
zung“, doch zweifelsohne keine Überset- 
zung im Sinne einer Bearbeitung ($ 3 
UrhG), wie ja auch die Computerüberset- 
zung, z.B. der Prawda ins Amerikanische, 
kein Werk ist. So gesehen, ist wahrschein- 
lich nur der Quellcode schutzfähig, und 
gerade dieser befindet sich praktisch nie 
auf den Schwarzkopien der Raubkopierer. 


Geistig besagt, daß das Werk im „Ge- 
hirn“ entstanden sein muß. Ein Lied ist ein 
Werk, dagegen die Darbietung des Liedes 
(= Gesang) nur eine Leistung (= ver- 
wandtes Schutzrecht). Ob der Objekt- 
code, wenn er schon, wie wir meinen, kein 
Werk darstellt, so doch wenigstens eine 
„Leistung“ ist, ist ebenfalls umstritten. 
Schon das normale Menschenverstand 
sagt uns, daß die „Knopfdruck”-Assem- 
blierung (für Richter: Man tippt nur das 


Kürzel „ASM“. Damit hat sich die Lei- 
stung) nicht in die gleiche Kategorie wie 
die echten Leistungen (Gedichtsvortrag, 
Gesangsdarbietung usw.) eingeordnet 
werden darf. 

Die Entdeckung eines Naturgesetzes (= 
Erfindung) wird nicht vom Urheber-, son- 
dern vom Patentrecht abgedeckt. Auch 
mathematische und logische Gesetze so- 
wie Algorithmen sind grundsätzlich nicht 
schutzfähig. Beispielsweise ist der im Jah- 
re 1962 von G,A.R. Hoare entwickelte 
Quicksort-Algorithmus kein Werk. 


Schöpfung besagt, daß etwas /ndividuel- 
les geschaffen werden muß, das über das 
Alltägliche hinausgeht und somit Werkcha- 
rakter hat. So fehlt beispielsweise Ge- 
schäftsbriefen meist die „Schöpfungshö- 
he“, während Gedichte fast immer „Werk- 
charakter“ haben. Im Gegensatz zum Pa- 
tentrecht muß eine Schöpfung „neuartig”, 
aber nicht neu sein, Während ein Patent 
grundsätzlich nur dem Ersterfinder erteilt 
wird, wäre im Urheberrecht auch die 
175ste Implementierung von Quicksort 
schutzfähig. Wie verträgt sich dies jedoch 
mit der obigen Aussage? Der theoretische 
Quicksort-Algorithmus als solcher ist nicht 
schutzfähig, wohl aber die individuelle, 
persönliche und zugleich „neuartige“ Im- 
plementierung in einer beliebigen Pro- 
grammiersprache. Je unkomplizierter je- 
doch ein Algorithmus, desto geringer ist 
der Spielraum für „Eigenschöpfungen“. In 
der Tat läßt ein korrektes Quicksort-Modul 
kaum noch Raum für Individualität und 
„Neuartigkeit“. Groteskerweise wäre eine 
fehlerhafte und eben dadurch „individuel- 
le“ Quicksort-Implementierung stets ge- 
schützt, während eine korrekte Implemen- 
tierung eher gemeinfrei (= nicht schutzfa- 
hig) ist. Im Gegensatz zur patentmäßigen 
Erfindung muß ein urheberrechtliches 
Werk nicht „stimmen“. Bekanntlich beruht 
die gesamte schöngeistige Literatur auf 
„erdichteten Dingen“, die nicht wahr sind 
im Sinne tatsächlicher Begebenheiten. 


1.2. Geschützte „Computerwerke“ 


Ein „Computerwerk“ gilt als geschützt, 
wenn es erstens eine persönliche geistige 
Schöpfung darstellt und wenn zweitens 
die Schutzfrist für das Werk noch nicht 
abgelaufen ist. Wegen des Algorithmen- 
charakters wird man jedoch vielen „Com- 
puterwerken“ oder zumindest den algo- 


rithmischen Teilen von „Computerwer- 
ken“ (Sortierroutinen, Rechenroutinen 
usw.) die Schutzfähigkeit absprechen 


müssen. Gleiches dürfte wohl für reine 


„Objektcode-Werke“ gelten, d.h. für Pro- 
gramme, von denen nur der Objektcode 
und nicht zusätzlich der Quellcode veröf- 
fentlicht wird. 

Nach Ablauf der Schutzfrist — d.h. norma- 
lerweise 70 Jahre nach dem Tod des Ur- 
hebers — wird das Werk gemeinfrei und 
darf dann von jedermann benutzt werden. 
Das deutsche Urheberrechtsgesetz 
schützt selbstverständlich zunächst nur 
deutsche Staatsangehörige ($ 120). Auf- 
grund internationaler Urheberrechtsab- 
kommen (insbesondere Welturheber- 
rechtsabkommen und Revidierte Berner 
Übereinkunft) werden Ausländer im Inland 
wie Inländer geschützt (Assimilations- 
prinzip, s. Hubmann, S. 21ff.). Wie vielen 
Lesern sicherlich bekannt ist, sind „Com- 
puterwerke“ im amerikanischen „Copy- 
right Act“ inzwischen gesondert geregelt. 
Diese Regelungen kommen jedoch auf- 
grund des Assimilationsprinzips in der 
Bundesrepublik nicht zur Anwendung, 
weil sich sonst der amerikanische Urheber 
in Deutschland besser stellen würde als 
der deutsche Urheber selbst. Übrigens sei 
an dieser Stelle erwähnt, daß sich das 
eingekreiste „c“ © aus deutscher Sicht 
auf das Welturheberrechtsabkommen be- 
zieht (Artikel Ill: „..bear the symbol © 
accompanied by the name of the copyright 
proprietor and the year of first publica- 
tion...“). In Deutschland selbst sind derar- 
tige Formalitäten nicht erforderlich. 

In den USA liest man oft von Public-Do- 
main-Software, d.h. vom Autor als ge- 
meinfrei erklärten und damit von jeder- 
mann benutzbaren Programmen. In 
Deutschland ist demgegenüber zumindest 
das sog. Urheberpersönlichkeitsrecht {8 
11 UrhG) unveräußerlich, so daß bei- 
spielsweise eine Urheber, der einem 
Computerclub seine Programme kosten- 
Ios zur Verfügung gestellt hat, wegen ge- 
wandelter Überzeugung seine Werke wie- 
der zurückziehen kann (8 42 UrhG). 


1.3. „Geheimwerke“ 


Vorab eine begriffliche Klärung: „Schüt- 
zen“ hat im Rechts- und Computerwesen 
eine unterschiedliche Bedeutung. Ein 
„geschütztes Urheberwerk“ ist eine 
Schutz genießende persönliche geistige 
Schöpfung. Ein „geschütztes Computer- 
werk“ (= „Geheimwerk“) ist ein kopier- 
geschütztes Programm. Ein geschütztes 
Computerwerk ist nicht notwendigerweise 
ein geschütztes Urheberwerk. 

Ein Verlag, der ein Sprachwerk verlegt, Ist 
aufgrund des jeweiligen Landespressege- 
setzes verpflichtet, 1 Vervielfältigungs- 


stück an die entsprechende Landesbiblio- 
thek sowie darüber hinaus 1 weiteres Ver- 
vielfältigungsstück an die Deutsche Biblio- 
thek in Frankfurt in /esbarer Form abzulie- 
fern (Pflichtabgabegesetz). Folglich kann 
jeder Urheber anhand des fremden 
Sprachwerkes prüfen, ob sein eigenes 
Werk in urheberrechtlichem Konflikt zu 
dem hinterlegten steht. Dagegen gehört 
es zu den Abnormitäten der „Computer- 
werke”, daß diese häufig in doppelt unles- 
barer Form veröffentlicht werden: Erstens 
erscheint anstelle des Quellcodes vielfach 
nur der unlesbare Obiektcode. Zweitens 
erscheint anstelle des ungeschützten 
Codes vielfach nur der kopiergeschützte 
und mithin unlesbare Code. „Computer- 
werke“ werden somit zu „Geheimwer- 
ken“. Sind jedoch „Geheimwerke“ über- 
haupt schutzfähig? 


Beispiel 1 

Ihr holden Schwäne, 

Und trunken von Küssen 
Tunkt ihr das Haupt 

Ins heilig-nüchterne Wasser 


Beispiel 2 

You lovely swans, 

and drunk with kisses 

you dip your heads 

into the sacred sober water 


Beispiel 3 

AO BO Ci 24 BC BD BEBF 
00 80 20 30 14 2A 2A SC 
AOLO-E ER7B2B2R 209 
DO EO IF 3A AC ED FD 60 


Beispiel 1 ist ein Auszug eines Gedichtes 
von Hölderlin („Hälfte des Lebens“). Wür- 
de Hölderlin noch leben, so würde es als 
Originalwerk voll unter den Schutz des 
Urheberrechtsgesetzes fallen. Analoges 
würde für die englische Übersetzung in 
Beispiel 2 gelten, die eine Bearbeitung im 
Sinne von $3 UrhG in Verbindung mit $ 23 
UrhG darstellen würde. Wie steht es je- 
doch mit Beispiel 3? Handelt es sich hier- 
bei um eine weitere Übersetzung in eine 
nur dem Urheber bekannte Geheimspra- 
che oder um ein eigenständiges Produkt in 
der Form eines „unchiffrierten Geheim- 
werkes“, das den vollen Schutz des Urhe- 
berrechts genießt? 

Nehmen wir als fiktiven Rechtsfall an, daß 
ein „Schwarzkopierer“ dieses vom „Ur- 
heber“ veröffentlichte „Werk“ (= Beispiel 
3), weil er dachte, es sei „ungeschützter 
Quatsch“, ohne Einwilligung kopierte und 
auf dem „Markt“ zu verkaufen versuchte, 
worauf der Urheber gegen den Schwarz- 
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B2-Motherboard mit 6502, 65C02C, Z80B, V24, Parallel-Schnittstelle, 80-Zeichenkarte, 


RGB-Ausgang, 192 KB RAM DM 2299,-- 
B3-Motherboard, wie B2, zusätzlich 256 KB Pseudofloppy DM 2899,-- 
Prometric® B2 Tischgerät ab DM 3349,-- 
Prometric® B3 Tischgerät ab DM 3999,-- 
Prometric® Portable B2, Monitor 9” ab DM 4449,-- 
Prometric” Portable B3, Monitor 9” ab DM 4999,-- 


Neu von DRV: C-DOS, das 80-Track DOS für B2 und Kompatible, verarbeitet Integer, DOS 3.3 und 


Prodos-Files DM 149,-- 
| CALVADOS, deutsche Textverarbeitung DM 299,-- 
TEAC FD55F DM 499,—— YE-DATA 480 DM 694,-- 
TEAC FD 55 B DM 449, -—— ERPHI-Controler DM 298,—— 
FDC4-Controler DM 179, -— SUPER-Controler DM 510,-—— 
Shugart-Bus-Kabel DM 45,-— IBM-look Gehäuse DM 218,-—— 
PREH-Commander AK87 DM 279,—— Monitor 15A DM 528,-— 
MONITOR 12A, 22 MHZ DM 355,--— 32K-PRINTER-BUFFER DM 389,-— 
M100-DRUCKER DM 825,—— MOTHERBOARD 64 KB + Z80 DM 699,-- 
Graphik-Par.-Interface DM 125,-— PSEUDO-FLOPPY 256 KB DM 899,-—— 
OPERATOR 2-Tastatur DM 580,—— 80-Track-Patch CP/m 3.0 DM 75,-- 
Super COM-Tastatur TIMER PLATINE DM 39,-— 
Si) DM 369,—— STEP Impuls Verdoppler DM 39,-—- 


Z 80 B-Karte 6 MHz (AL 5 comp) DM 799, -— 


Schaltnetzteil 7 Ampere 
80-Zeichenkarte 4 Zeichensätze DM 279,-- 


(VDI gepr.) DM 269,-—— 


NEU: 15 MB Winchester Slimline inkl. Controler DM 3699,-— 
Preh Commander AK 106 Starlight-1 21 Funktionstasten DM 359,—— 


Alle Preise inklusive 14% MwSt. Weiteres Zubehör auf Anfrage. 


E. Böhmer, DRV, Am Kellershusch, 6072 Dreieich, 0 61 03 / 846 47 





(a) Urheberrecht 


Übertragung des 
Urheberrechts 
(Vererbung) 


N 


(b) Erbe (c) Vermächt- 


nisnehmer 


(b oder c tritt an die Stelle von a) 


(eg) Einräumung eines einfachen 
Nutzungsrechts 

(z.B. Lizenzvertrag mit mehreren 
Buchgemeinschaften g I, g II usw.) 
(g I, g II usw. verwerten neben d) 


Einräumung des 
Nutzungsrechts 


Rückrufsrecht ya % 


(d) ausschließ-  (e) einfaches 
liches Nut- Nutzungs- 
zungsrecht recht 

(z.B. Verlags- (z.B. Auffüh- 
recht an einen rungsrecht an 
Verlag) mehrere Thea- 
(d verwertet ter) (e verwer- 
allein) tet neben a) 


(f) Übertragung des Nutzungs- 
rechts 

(z.B. Verkauf des Verlages) 

(z.B. Lizenzvertrag mit einer 
Buchgemeinschaft) 

(f tritt an die Stelle von d oder e) 


Urheberrechtsverletzung 
Der Kläger hat Anspruch auf 


a) Unterlassung 
bei nicht schuld- oder 
haftem Verhalten, 


a) Vernichtung 


b) Überlassung 


Bekanntmachung 
des Gerichtsurteils auf 
Kosten des Beklagten 


oder der Vervielfälti- 
b) Schadenersatz 

bei Vorsatz oder 

Fahrlässigkeit 









Neu im Hüthig Software Service 


SUPERPLOT 


Double-Hires-Utility 


gungsstücke und 
Druckformen 





Kopieren zum eigenen Gebrauch aus Schriftwerken 
(Bis zu 7 gleiche Kopien, keine Verbreitungsbefugnis) 


Persönlicher Gebrauch 

a) Natürliche Personen 

b) Häuslicher, privater, nichtbe- 
ruflicher Werkgenuß 

c) Werk braucht nicht erschienen 
zu sein 

d) Es können ganze Werke ko- 
piert werden 

e) Keine Vergütungspflicht 


Sonstiger eigener Gebrauch 

a) Natürliche oder juristische 
Personen 

b) Kopien kann man durch Ko- 
pieranstalten herstellen lassen 

c) Eigener Gebrauch (z.B. firmen- 
interner Gebrauch) 

d) Beruflicher/gewerblicher 
Zweck erforderlich 


ss 


Wissenschaftlicher Gebrauch 


a) Studenten, Privatgelehrte 

b) Rein wissenschaftlicher Zweck; 
nicht gegeben bei Populärwis- 
senschaft (Sachbuch) oder Lite- 
ratur 

c) Es können ganze Werke ko- 
piert werden, soweit geboten 

d) Werke brauchen nicht erschie- 
nen zu seın 


e) keine Vergütungspflicht 


Nicht-wissenschaftlicher, rein 

informatorischer Gebrauch 

a) Es dürfen nur Werkteile oder 
ganze Zeitschriftenaufsätze ko- 
piert werden 

b) Das kopierte Werk muß er- 
schienen sein 

c) Falls ein Werk vergriffen ist, 
darf es auch als ganzes Werk 
kopiert werden 

d) Für gewerbliche Unternehmen 
(Industrie- und Handelsfirmen, 
nicht freie akademische Berufe, 
wie Rechtsanwälte) besteht Ver- 
gütungspflicht 


Hinweis: Eine Novellierung des Kopierrechts (UrhG $ 53, 54) wird vor- 
aussichtlich in naher Zukunft durchgeführt werden. 


von Karl-Walter Bott, Programmadiskette und Manual, DM 48,— 


SUPERPLOT ist eine neue, ungewöhnlich kompakte und schnelle Ampersand-Utility für Double Hires, die einschließlich eines 
vollständigen ASCII-Shape-Zeichensatzes wahlweise in Bank 1 oder Bank 2 der Language Card liegt und damit sowohl unter 
ProDOS als auch unter DOS 3.3, falls letzteres in die LC-Bank geschoben wurde, benutzt und in eigene Applesoftprogramme 
integriert werden kann. SUPERPLOT unterstützt die üblichen HGR-Befehle, denen lediglich ein & vorangestellt werden muß, 
also z. B. & HPLOT 500, 100 TO 500, 150 usw. SUPERPLOT ist speziell für das Plotten von beschrifteten wissenschaftlichen 
Funktionskurven mit hoher Auflösung gedacht und weniger für HGR-Spiele. 
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APPIEII PASCAL\ 


APPLE! Betriebssystem und 
PASCAL Sprache 


Erstes deutsches Referenzwerk sämtlicher Befehle 
und Systemroutinen von Apple II Pascal — mit Adden- 
dum einschließlich Version Pascal 1.2! 


Gültig für Apple II, I Plus, Ie einschließlich der 
128K/80 Zeichen-Kontfiguration. 


_APHAEI 
AIXCAL 


Betriebssystem 


Apple II Betriebssystem, 
272 Seiten, DM 49,- 


Apple II Sprache, 
216 Seiten, DM 39,- 


Betriebssystem kommentiert ausführlich und in 
Deutsch Funktion und Benutzung der fast 60 System- 
routinen des Apple II Pascal Betriebssystems. 


Sprache ist das vollständige, deutsche Referenzwerk 
der „Apple Pascal“-Programmiersprache mit u.a. Infor- 
mationen über professionelle Pascal-Programmierung, 
Turtlegraphics, Programmbibliothek etc. 


Pascal 1.2 Addendum, etwa 100 Seiten, 
DM 36,- (1. Quartal ’85) 


In Vorbereitung: Addendum Pascal 1.2, ein 
Zusatz zum Buch „Betriebssystem“ für 1.2-Benutzer in 
Deutsch. 


„Nach Unterlagen von Apple Deutschland hergestellt“ 


te-wi Verlag GmbH 


5 
Theo-Prosel-Weg I VB 
8000 München 40 


Weiterführende Literatur... 


- 


— 


ATEM LEEHFAEÄANE ı ERENTO 


BI APPLE II - 
i Anwenderhandbuch 


(L. Poole) 


Erst mit Hilfe dieses Leitfadens werden Sie |" P 
1 Ihren Apple II erfolgreich einsetzen, denn | 
# Text und Bildmaterial gehen weit über das | 


hinaus, was herstellerseitig an Literatur 
angeboten wird. 


416 Seiten, Softcover, DM 56,- 


| APPLE IIPASCAL - 


Eine praktische Anleitung 
(A. Luehrmann, H. Peckham) 


Unentbehrlich für alle, die die Programmier- 


sprache PASCAL lernen wollen und 
Zugang zu einem Apple-Computer haben. 
544 Seiten, Softcover, DM 59,- 


] Computer für Kinder 
(Sally Greenwood Larson) 
Ein Buch für Kinder, ihre Lehrer 
und Eltern. 
„Computer für Kinder“ richtet 
| sich anKinder im Alter von 8 bis 
1 13 Jahren, für deren Interesse an 
Computern dieses Buch bewußt 
==3 geschrieben wurde. 


LOGO - 

Jeder kann programmieren 
(Daniel Watt) 

Buch des Jahres in den USA. Für die 


Ü Computer C64, ATARI, APPLE II, IBM-PC 


und TI-99. 
Hochwertiges Textbuch für Logo-Kurse für 
zu Hause und im Lehrbereich. 


AA, DM 59, — 


APPLE II - Bewegte 3D-Graphik 

(Phil Cohen) 

Selbstentworfene Graphiken und Dia- 
gramme - animiert oder als Standbilder — 
eben oder räumlich: alle erforderlichen 
BASIC-Programme mit Erklärung finden 
Sie in diesem Buch. 

ca, 190 Seiten, Softcover, DM 49,- 


Apple Maschinensprache 

Für BASIC-Programmierer der einfachste 
Zugang zur Muttersprache des Apple. Wesent- 
lich schnellere Maschinenprogramme, direkte 
Manipulation des Mikroprozessors 6502 im 
Apple — als Brücke dorthin benötigt dieses 


‘| Buch nur die drei BASIC-Befehle, POKE, 


CALL, PEEK. D. Inman/K, Inman. DM 49, — 


Unterhaltsam und leicht verständlich, 
A4 quer, Fadenheftung, DM 29,80 


Note Wi ort ic: hun r cp 
6502 - Programmieren in Assembler DM 59,- 
VisiCalc, 50 Programme auf Diskette, DM 79,- 


In Vorbereitung: 
Macintosh Programmier-Handbuch DM 59,- 





kopierer Anzeige erstattete. Es kommt zu 
einer Beschlagnahme von „Schwarzko- 
pien“ und anschließend zum Prozeß. Der 
Schwarzkopierer behauptet, das Werk sei 
eine „Folge von mechanischen Chiffren”, 
während der Urheber entgegnet, es han- 
dele sich um ein „Hölderlin-Übersetzung“ 
in einem unknackbaren Code“. Wir würde 
der Richter den Fall beurteilen, wenn er 
das „Geheimwerk“ nicht vorher 
„Knackt"? 

Aus dieser Persiflage lernen wir, daß bei 
„Geheimwerken“ niemand zweifelsfrei 
nachprüfen kann, ob sie schutzfähig sind 
oder nicht. Folglich kann auch niemand 
aufgrund des Urheberrechtsgesetzes 
(wohl aber u.U. aufgrund anderer Geset- 
ze) zur Rechenschaft gezogen werden, 
denn sonst würde der Willkür Tür und Tor 
geöffnet. Man stelle sich einmal vor, das 
Urheberrechtsgesetz selbst wäre seiner- 
zeit im Bundesgesetzblatt in chiffrierter 
Form veröffentlicht worden! Wer hätte sich 
dann danach richten können? Man stelle 
sieh ferner plastisch vor, alle Bücher und 
Zeitschriften würden in codierter Form er- 
scheinen! Wer würde dann noch von 
schutzwürdigen „Kulturgütern“ spre- 
chen? 

Obgleich das Pflichtabgabegesetz mit dem 
Urheberrechtsgesetz direkt nichts zu tun 
hat, ist es dringend an der Zeit, daß auch 
für „Computerwerke“ eine Pflichtabgabe 
als Quellcode gesetzlich vorgeschrieben 
wird, weil dann jedermann bei der Deut- 
schen Bibliothek oder der jeweiligen Lan- 
desbibliothek in die „Computerwerke” 
Einsicht nehmen kann, womit allererst ent- 
schieden werden kann, ob ein Werk im 
Sinne des Urheberrechtsgesetzes vor- 
liegt. Denn man merke sich: Nicht jedes 
„Computerwerk“ ist automatisch ein urhe- 
berrechtlich geschütztes Werk. Vielmehr 
besteht bei kopiergeschützten Werken 
stets der Verdacht, daß sie nicht urheber- 
rechtlich geschützt sind. 

Der Grund, warum „Computerwerke” kei- 
ne „Geheimwerke“ sein dürfen, wird kla- 
rer, wenn man sich die zwei Seiten eines 
„Computerwerks“ näher ansieht. Die äu- 
Bere Seite ist das Computerprogramm als 
Erscheinung und Leistung, und die innere 
Seite ist das Computerprogramm als 
Werk. Urheberrechtliich schutzfähig ist 
normalerweise nur die innere Seite. Ein 
einfaches Beispiel: Auf der kopierge- 
schützten Demo-Diskette „A Guided Tour 
of Macintosh“ der Firma Apple ist ein klei- 
nes Programm, das ein stark vereinfachtes 
Klavier simuliert, auf dem man mit der 
„Maus“ spielen kann, Die Grafik der Ta- 
sten wird man kaum als ein Kunstwerk 
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bezeichnen können, Und da das Pro- 
gramm keine Melodie enthält, liegt auch 
kein Musikwerk vor. Was der Anwender 
sieht, also die äußere Seite des Pro- 
gramms, ist damit überhaupt kein Werk, 
wie ja auch ein echtes Klavier kein Werk 
im Sinne des Urheberrechts ist. Wie steht 
es dagegen mit der inneren Seite oder dem 
Programm selbst? Da die „Guided-Tour”- 
Diskette kopiergeschützt ist, kann man 
sich die innere Seite nicht ansehen und 
damit auch nicht entscheiden, ob eine per- 
sönliche geistige Schöpfung vorliegt. Das 
Klavierdemo könnte theoretisch sogar ein 
Plagiat sein, das die Firma Apple bei ir- 
gendeinem anderen Autor „abgekupfert“ 
hat. In diesem Fall wäre dann der Macin- 
tosh-Käufer zugleich Erwerber einer 
Raubkopie. Da die Firma Apple eine Vor- 
liebe für Abmahnungen hat, hätte sie hier 
endlich eine Handhabe, um die gesamte 
eigene Kundschaft abzumahnen... Aber 
Spaß beiseite: Dieses triviale Beispiel 
zeigt bereits auf das deutlichste, daß der 
Käufer eines „Geheimwerkes“ nicht über- 
prüfen kann, ob er ein Plagiat erworben 
hat. 

Bei größeren Programmpakeien fallen ei- 
nem immer wieder ähnliche Leistungen 
auf: Sortierroutinen, Mergeroutinen, Bild- 
schirmroutinen, Rechenroutinen, Druck- 
routinen usw. Wenn man solche „Compu- 
terwerke“ dann „knackt“, stellt man fest, 
daß oft nicht nur die Leistungen dieser 
Programme ähnlich sind. Man nehme das 
Sori-Modul des Autors X, das Merge-Mo- 
dul des Autors Y, den Maskengenerator 
des Autors Z, kleide das ganze in eine 
neue äußere Form und mache dann alles 
so kopiergeschützt, daß man sich Quellen- 
angaben sparen kann — und fertig ist 
das neue Programmpaket. Manch ein 
Richter würde vom Ledersessel fallen, 
wenn er die Quellcodes diverser kopierge- 
schützter Programmpakete detailliert ver- 
gleichen würde. Im Gegensatz zu wissen- 
schaftlichen Werken, die reichlich Zitate 
aus fremden Werken enthalten (was im 
übrigen rechtens ist), findet man bei den 
kommerziellen Computerprogrammen 
praktisch nie Zitate. Dies kann zweierlei 
bedeuten: Entweder sind die Programm- 
autoren so genial, daß sie jedes Programm 
von Grund auf neu schreiben, oder sie 
wiegen sich in der Hoffnung, daß keiner 
merkt, bei wem sie „abgekupfert“ haben, 
weil sie ihre Programme nachträglich ko- 
piergeschützt machen. 

Ein Beispiel: Nehmen wir an, Sie kaufen 
das Diskettenkopierprogramm B, das sich 
mit der Bildschirmmeldung „Insert Disks. 
Press any key to continue“ meldet, Neh- 


men wir ferner an, daß Sie bereits ein 
älteres Kopierprogramm A besitzen, das 
sich mit der gleichen Meldung vorstellt 
und im übrigen die gleiche Funktion des 
Diskettenkopierens erfüllt. Da Phrasen in 
der Art „Press any key to continue“ ohne- 
hin keinen Urheberrechtsschutz genießen 
und da die Kopierleistung des Programms 
ebenso wie die Kopierleistung eine Photo- 
kopiergerätes nicht schuizfähig ist, wer- 
den Sie sich fragen, ob Sie nicht einem 
Plagiator zum Opfer gefallen sind. Schutz- 
fähig wären nämlich nur die Kopierpro- 
gramme selbst, genauer gesagt die per- 
sönlich-geistig-schöpferische Art und 
Weise der Implementierung der Program- 
me. Aber davon sehen Sie nichts, wenn 
diese kopiergeschützt sind. 

Wer Banknoten erhält, muß selbst oder 
durch einen geeigneten Experten nach- 
prüfen lassen können, ob die Scheine 
„Blüten“ sind. Ähnlich muß auch der Er- 
werber einer Software selbst oder durch 
einen Experten in Erfahrung bringen kön- 
nen, ob die Software ein Plagiat ist. Dies 
ist jedoch bei kopiergeschützten Werken 
per definitionem nicht möglich. Während 
also Buchautoren ihre Manuskripte, Kom- 
ponisten ihre Noten und Künstler ihre Ge- 
mälde für jedermann nachprüfbar offenba- 
ren, zeigen viele Software-Entwickler nur 
„Geheimwerke“ vor, die mit großer 
Selbstverständlichkeit als Urheberwerke 
ausgegeben werden, obwohl sie es wahr- 
scheinlich oft gar nicht sind. Aufgrund die- 
ser unbefriedigenden Rechtslage ergibt 
sich nur eine sinnvolle Empfehlung: 
Grundsätzlich sollten nur diejenigen 
„Computerwerke“  Urheberrechtsschutz 
genießen, deren Quellcodes veröffentlicht 
oder öffentlich hinterlegt werden. 


2. WAS IST EINE WERKKOPIE? 


Der $ 53 UrhG lautet auszugsweise wie 
folgt: 

Vervielfältigung zum persönlichen Ge- 
brauch: 

(1) Zulässig ist, einzelne Vervielfältigungs- 
stücke eines Werkes zum persönlichen 
Gebrauch herzustellen. 

(2) Der zur Vervielfältigung Befugte darf 
die Vervielfältigungsstücke auch durch ei- 
nen anderen herstellen lassen;... 

(3) Die Vervielfältigungsstücke dürfen we- 
der verbreitet noch zu Öffentlichen Wie- 
dergaben benutzt werden. 

(4)... 

(5) Ist nach der Art eines Werkes zu erwar- 
ten, daß es ... durch Übertragung von ei- 
nem Bild- oder Tonträger auf einen ande- 
ren zum persönlichen Gebrauch vervielfäl- 
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tigt wird, so hat der Urheber des Werkes 
gegen den Hersteller von Geräten, die zur 
Vornahme solcher Vervielfältigungen ge- 
eignet sind, einen Anspruch auf Zahlung 
einer Vergütung für die durch die Veräuße- 
rung der Geräte geschaffene Möglichkeit, 
solche Vervielfältigungen vorzunehmen. 
... Der Anspruch kann nur durch eine Ver- 
wertungsgesellschaft geltend gemacht 
werden. Als Vergütung sieht jedem Be- 
rechtigten ein angemessener Anteil an 
dem vom Hersteller aus der Veräußerung 
der Geräte erzielten Erlös zu; die Summe 
... darf fünf vom Hundert dieses Veräuße- 
rungserlöses nicht übersteigen. 


& 53 UrhG regelt den „persönlichen Ge- 

brauch“ und 8 54 UrhG den „sonstigen 

eigenen Gebrauch“. „Ersterer ist ein be- 

sonders begünstigter Unterfall des letzte- 

ren“ (Hubmann, S. 158). Aus Platzgrün- 

den beschränken wir uns auf den „per- 

sönlichen Gebrauch”. 

Es gibt folgende Arten von „Computer- 

werk-Exemplaren“ (allesamt in der Regel 

in Diskettenform): 

a) Primäroriginal = Quellcode 

b) Sekundäroriginal = Objektcode 

c) Originalwerkstück = von (b) hergestell- 
te Kopie 

d) Primärvervielfältigungsstück = von (c) 
hergestellte Kopie 

e) Sekundärvervielfältigungsstück = 
(d) hergestellte Kopie 

Die Originalwerkstücke zeichnen sich in 

der Regel durch ein entsprechendes Eti- 

kett auf der Diskette aus. Raubkopien re- 

krutieren sich aus Primär- und noch häufi- 

ger aus den Sekundärvervielfältigungs- 

stücken, doch ist — wie wir gleich sehen 

werden — keineswegs jedes Vervielfälti- 

gungsstück automatisch eine Raubkopie. 


von 


2.1. Beispielfälle 


Anstelle akstrakter Definitionen erläutern 
wir das, was nach dem Kopierrecht (un)- 
zulässig ist, anhand von Beispiel(zitat)en: 


1. Originale: Mit Originalwerkstücken 
kann man machen, was man will. Man 
kann sie „an Verwandte und Freunde wei- 
tergeben“ (Hubmann, S. 158). „Nach der 
Erschöpfungstheorie ist es sogar gestat- 
tet, Werkstücke weiterzuverkaufen” (Hub- 
mann, S. 158). 


2. Einzelexemplare: Es ist „zulässig, ein- 
zeine Vervielfältigungsstücke eines Wer- 
kes ... zum persönlichen Gebrauch herzu- 
stellen“ (Hubmann, S. 158). Aufgrund des 
sog. Bremer Schulbuchprozesses, bei 
dem es darum ging, daß Bremer Schulen 
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ganze Klassensätze vervielfältigt hatten, 
ist der Begriff „einzelne Stücke" als maxi- 
mal 7 Exemplare auszulegen (weil eine 
Schulklasse in der Regel mehr als 7 Schü- 
ler umfaßt). Konkret gesprochen heißt 
dies, daß man z.B. „Appleworks“ kaufen 
und im Anschluß daran maximal 7 Kopien 
an maximal 7 Freunde verteilen kann. 


3. Beliebige Dritte: „Persönlicher Ge- 
brauch liegt vor, wenn durch die Vervielfäl- 
tigung lediglich dem Hersteller (gemeint: 
Kopierer) oder dem mit ihm durch ein per- 
sönliches Band verbundenen Bekannten- 
kreis der Werkgenuß vermittelt werden 
soll“ (Hubmann, S. 158). Unzulässig ist es 
also, wenn für beliebige Dritte Kopien her- 
gestellt werden. Wenn mir also mein 
Freund eine Kopie seines als Original- 
werkstück erworbenen „S-C-Macroassem- 
blers“ mitbringt, so ist dies (aus der Sicht 
meines Freundes) zulässig, weil wir durch 
„ein persönliches Band“ verbunden sind. 
Wenn aber ein Apple-Händier einem 
Macintosh-Käufer eine Kopie vom neuen 
„Finder 1.1* in die Hand drückt, dann ist 
dies (aus der Sicht des Händlers) unzuläs- 
sig, denn ein Gewerbetreibender handelt 
per definitionem nie aus „privater Verbun- 
denheit“. 


A. Kopieranstalt: „Der zur Vervielfälti- 
gung Befugte darf die Vervielfältigung 
auch durch einen anderen, sogar durch 
einen Gewerbebetrieb, herstellen lassen” 
(Hubmann, S, 159). Man könnte also eine 
„Knackerfirma“ beauftragen, „Prolok”- 
geschützte Originalprogramme zu dupli- 
zieren, 


5. Weiterverbreitung: Gemäß 8 53, Ab- 
satz 3 dürfen Vervielfältigungsstücke nicht 
verbreitet, d.h. entgeltlich oder unentgelt- 
lich weitergegeben werden. Der Verkauf 
oder Tausch von Vervielfältigungsstücken 
durch Anzeigen in Zeitschriften ist dem- 
nach stets verboten, zumal sich eine An- 
zeige an beliebige Dritte wendet, mit de- 
nen man natürlich nicht durch ein „per- 
sönliches Band“ verbunden sein kann. 
„Ebenso ist der Verkauf ... mittels Zei- 
tungsanzeige unzulässig; auch ein 
Tausch unter den gleichen Bedingungen 
würde gegen Absatz 3 verstoßen“ (Norde- 
mann, S. 324). (Der Verkauf oder Tausch 
von Originalwerkstücken ist indes stets er- 
laubt.) Andererseits heißt es bei Norde- 
mann, S. 323: „Ein zur persönlichen Be- 
nutzung hergestelltes Werkstück (ge- 
meint: Vervielfältigungsstück) darf man je- 
doch später veräußern, wenn man es nicht 
mehr braucht“. Das heißt im Extremfall: 
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Wenn die (bis zu 7fache) Vervielfältigung 
des „Visicalc“-Originals „von vornherein 
mit der Absicht geschieht, das Vervielfälti- 
gungsstück zu verkaufen“ (Nordemann, 
S, 323), so ist dies unzulässig. Braucht 
man jedoch das Originalwerkstück und die 
bis zu 7 Vervielfältigungsstücke von „Visi- 
calc“ später nicht mehr, so kann man sie 
nunmehr verkaufen. Nimmt man als weite- 
ren Extremfall an, daß man — ähnlich wie 
bei Heiratsanzeigen — „auf diesem Wege“ 
ein „persönliches Band“ mit zunächst 
„unpersönlichen Fremden“ herstellt, de- 
nen man später aus nunmehr „privater 
Verbundenheit“ eines der „Visicalc”-Ver- 
vielfältigungsstücke im Wege des „freund- 
schaftlichen Tausches“ zukommen läßt, 
dann wird klar, daß das urheberrechtliche 
Kopierrecht so viele Löcher wie der 
Schweizer Käse hat. 


2.2. Ein fairer Kompromiß 


In 8 53, Absatz 5 wurde für Musik- und 
Videobänder (einschließlich Kassetten 
und Schallplatten) eine Geräteabgabe ein- 
geführt, weil der Gesetzgeber hier von der 
Erwartung ausging, daß diese Bild- und 
Tonträger üblicherweise zum persönlichen 
Gebrauch vervielfältigt werden. Dies gilt in 
vollem Umfang auch für Software. Deshalb 
würde meines Erachtens die ideale Lö- 
sung des Kopierdilemmas darin bestehen, 
daß man für Diskettenlaufwerke (abstrakt: 
Datenträgervorrichtungen) eine Geräteab- 
gabe und/oder für Leerdisketten (abstrakt: 
Datenträger) eine Diskettenabgabe ein- 
führt. Diese Abgaben sollten — wie bei 
Tonbandgeräten usw. — 5% des Fabrikab- 
gabepreises nicht übersteigen und durch 
eine neue Wahrnehmungsgesellschaft 
(analog zur GEMA) vereinnahmt und dann 
an die Software-Autoren verteilt werden. 
(Ähnliches sollte im übrigen auch für Pho- 
tokopiergeräte gelten). Damit würde dann 
die Vervielfältigung zum persönlichen Ge- 
brauch nicht mehr diskriminiert oder gar — 
wie bei der gegenwärtigen „Verhaftungs- 
welle“ — kriminalisiert werden. Aus Grün- 
den der Rechtsklarheit bei gewerbsmäßi- 
gen Raubkopierern sollte der Verkauf von 
Vervielfältigungsstücken urheberrechtlich 
grundsätzlich unzulässig sein. Und 
schließlich sollten nur Primärvervielfälti- 
gungen (von Originalwerkstücken) zuge- 
lassen werden. 
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Graf-quattr 


Künstlerische Grafik für jedermann 


Teil 1: Wie ein Supereditor entsteht 


1. DIE GRUNDLAGEN 


Es hat alles vor etwa 16.000 Jahren ange- 
fangen. Da nagte Flintstone jr. an einem 
vom Vater mitgebrachten Bisonrippchen 
und wollte endlich wissen, wie wohl ein 
ganzer Bison aussehen mag. Flintstone 
sen. versuchte dies zuerst mit viel Grun- 
zen, Herumspringen und Armewedeln zu 
erklären, aber der Gesichtsausdruck des 
Fiilus war und blieb ziemlich verdattert. 
Plötzlich hatte Flinstone sen. einen gewal- 
tigen Geistesblitz und machte die beste 
Erfindung seit dem Feuer. Er besorgte sich 
Lehm in verschiedenen Farben und malte 
einen Bison in seiner ganzen Pracht an die 
Höhlenwand, der heute noch in Altamira 
zu bewundern ist. 


In jedem steckt ein Dürer 
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1.1. Ohne Input kein Output 


Wie macht man aber Bilder mit dem Com- 
puter? Wie kommt Onkel Dagobert auf die 
Mattscheibe? Auch im Falle der Compu- 
tergrafik gilt das eiserne Gesetz: Ohne 
Input kein Output! 


Computergrafik kann grob in zwei Katego- 
rien eingeteilt werden: Die eine nennt man 
Vektorgrafik. Hierbei handelt es sich 
hauptsächlich darum, eine mehr oder we- 
niger komplexe informationsdatei zu ver- 
walten. Die zweite Kategorie heißt Raster- 
grafik, und in diesem Fall wird nur ein 
Bitmuster verändert und verwaltet. Diese 
Beitragsserie wird sich nur mit dieser 
zweiten Grafikkategorie befassen. 

Neben dem Grafiktablett, dem klassischen 
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N.G. Barbieri 


Eingabegerät der Computergrafik, Kann 
die Videokamera oder ein Digitizer den 
grafischen Input ganzer Bilder besorgen. 
Mühseliger ist der Input mittels Paddle, 
Joystick oder Trackball. Auch kommt hier 
das „Tablett des armen Mannes“, die 
Maus, in Frage. Die alphanumerische Ta- 
statur, unterstützt von geeigneter Softwa- 
re, ist als Input und Verarbeitungswerk- 
zeug ebenfalls nicht zu verachten. 

Der Output auf dem Monitor ist bei der 
Computergrafik selbstverständlich. Hard- 
copies (Printouts, Ausdrucke) können mit 
einem grafikfähigen Drucker hergestellt 
werden, z.B. mit dem hervorragenden 
Programm von Jürgen und Dieter Geiß im 
Peeker Heft 1/84. Glückliche Besitzer ei- 
nes Plotters können mit einem geeigne- 
tem Grafik-Dump-Programm weitaus bes- 
sere Ergebnisse erzielen. Foto, Film und 
Videoband können sich als weitere Me- 
dien anbieten. 

Wenn wir den Input mit einer Kakaobohne 
und den Output mit einer fertigen Tafel 
Schokolade vergleichen, wird sofort klar, 
daß dazwischen eine ganze Menge pas- 
sieren muß. Man braucht sozusagen 
Werkzeuge, um eine Transformation des 
ursprünglichen Werkstoffes in das fertige 
Produkt zu erreichen, und zwar die richti- 
gen! Versuchen Sie einmal, eine Kuckucks- 
uhr mit Vorschlaghammer und Rohrzange 
zu reparieren. Also mußte für unsere 
Zwecke erst einmal ein Raster-Grafik-Edi- 
tor erstellt werden. Sie werden hier viel- 
leicht einwenden, daß bereits E-Z Draw, 
Alphaplot und viele andere Editoren vor- 
handen sind. Stimmt! Ich kenne sie alle, 
und doch habe ich es mit diesen Editoren 
noch nie geschafft, ein künstlerisches Bild 
in die Welt zu setzen. Was mir vorschwebt, 
ist der „Totale Editor“, die komplette Ma- 
nipulation einer Grafikseite. 
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Bild 2: Graf-quatiro-Seite und Pilotseite. Was auf der Pilotseite angezeigt ist, wird von 
Graf-quattro automatisch in die Grafikseiten geholt. 


1.2. Programmstruktur 


Bevor ich auf die Vorzüge eines solchen 
Supereditors eingehe, einige Worte zum 
Gesamtkonzept oder zur „Programm- 
struktur“, wie Informatiker sagen würden. 
Zuallererst: Ein solches Programm ist so 
groß, daß der gesamte Speicher des Ap- 
ple nicht reichen würde. Deshalb muß das 
Gesamtprogramm in Module aufgeteilt 
werden. Jedes dieser Module wird bei Be- 
darf von der Diskette geladen und gezielt 
eingesetzt. Um die Daten braucht man 
sich keine Sorgen zu machen, denn bei 
der Rastergrafik sind es eben nur eine 
Menge Bits, die auf einer der Grafikseiten 
gut aufgehoben sind. Jedes Modul ist also 
ein Teilprogramm, das eine bestimmte 
Verarbeitung der Grafik erlaubt. Wenn alle 
notwendigen Module erstellt sind, braucht 
man nurnoch ein „Hauptmenü" zu schrei- 
ben. 


Jedes Modul wird aus einem Applesoft- 
Programm und einer Reihe von Assem- 
blerroutinen, die die eigentliche Arbeit 
schnell und effizient erledigen, bestehen. 
Jede Assemblerroutine wird so gestaltet, 
daß sie eine einzige Aufgabe erfüllt und 
auch einzeln, d.h. unabhängig vom Ge- 
samtprogamm, anwendbar ist. Auf diese 
Weise kann der Leser die Assemblerrouti- 
nen je nach Bedarf in eigene Programme 
einbauen. Ich werde versuchen, in den 
Beiträgen jeden einzelnen Programmteil 
so zu kommentieren, daß auch der As- 
sembler-Anfänger folgen Kann. 


1.3. Speicherverteilung 


Bevor man mit einem Progamm beginnt, 
sollte man sich immer einen Überblick 
über den vorhandenen Speicher und des- 
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sen Aufteilung in die benötigten Bereiche 
verschaffen. 

Der verfügbare RAM-Speicher wird in vier 
Bereiche eingeteilt: 

® Der untere Teil von $0800 (2048) bis 
SIFFF (8191) ist für Applesoft reserviert. 
Keines unserer Äpplesoft-Progamme darf 
also größer als 6042 Bytes werden, ein- 
schließlich der Variablen und Strings. 

@ Der mittlere Bereich von $2000 (8192) 
bis $5FFF (24575) ist von den zwei Grafik- 
seiten belegt. Die erste Grafikseite (HGR) 
wird unsere Arbeitsseite sein, die zweite 
Grafikseite (HGR2) benutzen wir als Gra- 
fikhilfsseite, sozusagen als Schmierbogen 
oder Ablegeplatz für Hilfsmittel. 

® Der obere Bereich ab $6000 (24576) 
besteht wiederum aus zwei Teilen. Indem 
unteren Teil werden die jeweils notwendi- 
gen Assemblerroutinen untergebracht. 
Oberhalb des Assemblerbereichs werden 
wir, je nach Bedarf, andere Werkzeuge 
bereithalten, wie z.B. Shape-Tabellen und 
Fonts für die Beschriftung der Grafikseite. 
@ Der kleine Bereich von $0300 (768) bis 
$03CF (975) ist wie geschaffen, um Infor- 
mationen sicher aufzubewahren, die von 
einem Modul zum anderen zu Übertragen 
sind. Außerdem werden wir hier Variablen 
und Pointer für den Assemblerteil unter- 
bringen. 

® In der Zeropage $0000 (0) bis $OOFF 
(255) sind noch eine ganze Menge Stellen 
frei, die das Betriebssystem überhaupt 
nicht benutzt. Diese werden natürlich auch 
zum Einsatz kommen, um die Assem- 
blerroutinen schneller und kompakter zu 
gestalten. 


2. DIE MODULE 


Kommen wir nun zu den einzelnen Modu- 
len. So wie jede Assemblerroutine auch 
allein einsetzbar ist, ist jedes Modul prak- 
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tisch ein in sich geschlossenes Programm. 
Wer also ein bestimmtes Modul nicht 
braucht, kann es weglassen. 

Die Aufteilung in einzelne Module mit ge- 
nau definierten Aufgaben hat auch den 
Vorteil, daß jeder Anfänger das Ganze 
besser verfolgen kann. 


2.1. Page-Editor 


Das ist im Grunde genommen nichts Neu- 
es. Page-Editoren gibt es inzwischen wie 
Sand am Meer. Ich werde aber versuchen, 
etwas extrem Bequemes mit einer Menge 
zusätzlicher Funktionen zu schaffen. Also 
nicht nur Punkte, Linien, Vierecke, Boxen, 
Kreise, Ellipsen, Bogen usw., sondern 
auch die Möglichkeit, Teile der Grafik zu 
transponieren, zu verdoppeln, Strukturen 
zu wiederholen usw. Der Page-Editor kann 
wie alle anderen Module eingesetzt wer- 
den, um das Vierfache der auf der Apple- 
Grafik verfügbaren Grafikpunkte zu editie- 
ren, und zwar mit dem folgenden Modul. 


2.2. Graf-quattro 


Dieses Modul entstand, weil ich mich ge- 
ärgert habe. Als ich meinen ersten Apple 
kaufte (beinahe in der Steinzeit), war es 
schon ein kleines Wunder, 280 x 192 
Punkte als Hires-Grafik zur Verfügung zu 
haben. Später kamen die anderen und 
protzten mit ihrer größeren Auflösung. Zu- 
erst war ich neidisch, doch dann habe ich 
mir gesagt: Was die anderen können, kann 
auch mein Apple, wenngleich auf Um- 
wegen. 

Also, wenn man vier Grafikseiten im Qua- 
drat zusammenklebt, verfügt man über ei- 
ne Grafik mit 560 x 384 Punkten. Selbst- 
verständlich kann man solch eine Grafik 
nicht auf einmal im Bildwiederholspeicher 
unterbringen. Ein beliebiger Ausschnitt 
davon geht aber schon. Demgegenüber 
kann mit einem Plotter oder mit einem 
Drucker der ganze Bereich gedumpt wer- 
den. Für den Printerdump sind vielleicht 
die oben zitierten Autoren so nett, eine 
modifizierte Version ihres wirklich sehr gu- 
ten Programms den Peeker-Lesern anzu- 
bieten. Ich stelle mir vor, daß erst die 
Abschnitte eins und zwei (siehe Bild) je- 
weils in die erste und zweite Grafikseite 
geladen und dann parallel gedumpt wer- 
den. danach folgen die Abschnitte drei und 
vier, so daß das komplette, zusammen- 
hängende Bild auf Papier gebracht werden 
kann. Falls eine Language-Card vorhan- 
den ist, könnte man ein gemovtes DOS 
einsetzen und somit Platz genug für alle 


vier Grafikseiten schafften, und zwar von 
$2000 bis $YFFF. 

Zu den vier Grafikseiten wird eine fünfte 
angelegt, die eine geschrumpfte Version 
aller vier Seiten enthält und als Kontrollsei- 
te dient. Das Graf-quattro-Modul arbeitet 
folgendermaßen: 


Auf der Diskette werden zuerst fünf Gra- 
fikseiten angelegt. Die vier Seiten der ei- 
gentlichen Grafik können ebensowonhl leer 
sein oder bereits Teile der Grafik enthal- 
ten. Mit einem Digitizer könnte man sogar 
ein Grundmotiv in der Gesamtauflösung 
als Basis für die Grafik abtasten. Diese 
Seiten bekommen einen beliebigen Datei- 
namen, gefolgt von den Zahlen 1 bis 5. Die 
Aufgabe des Graf-quattro-Moduls ist es, 
mit Hilfe der fünften Seite, die wir Pilotsei- 
te nennen wollen, aus den vier Seiten 
einen beliebig zu plazierenden Ausschnitt 
von 280 x 192 Punkten herauszuholen. 
Danach bringt das Graf-quattro-Modul den 
editierten Ausschnitt in die vier Grafiksei- 
ten zurück. Die Pilotseite wird automatisch 
entsprechend geändert oder ergänzt. Wer 
eine RAM-Karte besitzt und als Pseudo- 
Disk benutzt, kann dies alles sehr schnell 
während des Editiervorgangs erledigen. 


DOS 


1$9600 









Shapes 


+ 


Fonts 


Maschinensprache 
Patches 


2048 $0800 


975 $O3CF 
Variable + Pointer 

768 1 $0300 

255 - SOOFF 

0 = $0000 


Bild 1: Speicherverteilung bei Graf-quattro 
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2.2.1. Spezialroutinen 


Scrunch: (to scrunch = wörtlich „stau- 
chen”; auch „to crunch“) Die Ässem- 
blerroutinen dieses Moduls werden schon 
für das Graf-quattro-Modul eingesetzt. 
Diese Funktion ist als separates Modul 
sehr nützlich, um eine Grafikseite linear 
um die Hälfte zu verkleinern, so daß das 
Ganze oder Teile davon in anderen Grafi- 
ken Verwendung finden können. 


Zoom: (to zoom = wörtlich „auseinander- 
ziehen“) An sich findet dieses Modul we- 
nig Verwendung, da beim Aufblasen von 
einem Teil der Grafik die ganze Struktur 
vergröbert wird, so daß jeder Punkt in ein 
Blöckchen von vier Punkten verwandelt 
wird. In einzelnen Fällen könnte ein ge- 
zoomter Ausschnitt aber von Nutzen sein. 


Retusche mit Lupe: Damit wird eine feine 
und sehr genaue Punktretusche der Gra- 
fikseite ermöglicht. Um die Augen nicht 
übermäßig zu strapazieren, nutzt das Mo- 
dul den Zoomeffekt als bewegliche Lupe. 
Pinsel: Dieses Modul liefert uns eine Rei- 
ne von Hires-Pinseln, vom feinen Retu- 
schepinsel bis zur dicken Quaste, und ei- 
nen Radiergummi. Damit kann man die 
Grafikseite frei gestalten oder ergänzen, 
z.B. kann man sie mit Schattierungen oder 
Strukturen versehen, 


Turtle: Dies ist eine Emulation der Turtle- 
grafik, die aber mit einigen zusätzlichen 
Funktionen ausgestattet ist. Man kann 
nicht nur eine Linie bilden und drehen, 
sondern sie auch in jeder Richtung ver- 
schieben. Die Fähigkeiten des Page-Edi- 
tors werden so erheblich erweitert. 


Spiegeln: Die ganze Seite oder ein belie- 
biger Ausschnitt davon kann, egal ob links/ 
rechts oder oben/unten, gespiegelt wer- 
den. Der Editor wird viel variabler, und Tei- 
le der Grafik können für eine Weiterver- 
wendung vorbereitet werden. 


Drehen: Ein beliebiger Ausschnitt der 
Grafikseite bis zu max. 192 x 192 Punkten 
kann jeweils um 90 Grad gedreht werden. 
Dies ergänzt das Spiegelmodul, um z.B. 
Umrandungen oder Ornamentik anzubrin- 
gen. 

Fill: Eine komplizierte Assemblerroutine 
besorgt das punktgenaue Füllen jeder ge- 
schlossenen Fläche, gleichgültig wie sie 
gestaltet ist. 

Kollage: Hier geht es nicht darum, vierek- 
kige Grafikausschnitte übereinander zu 
bringen; das kann schon jeder Macintosh- 
Rechner. Es ist vielmehr das exakte, kon- 
turierte Aufkleben von Grafikteilen auf 
eine darunterstehende Grafik gemeint! 
Peeker macht’s eben möglich. 


Shapes: Das Modul wird alle Geheimnis- 
se der Apple-Shapes enthüllen. Für Gra- 
fikanfänger wird dieser Beitrag besonders 
interessant sein, da sie sich erfahrungsge- 
mäß mit den Apple-Shapes immer schwer 
tun. 


2.3. Editor mit Shapes 
Dies ist der normale Shape-Editor. 


2.4. Editor mit Autoshapes 


Dieses Modul wird eine große Überra- 
schung werden, Einfach einen beliebigen 
Ausschnitt auf einer Grafikseite definieren, 
und der Inhalt wird automatisch in ein 
Shape verwandelt, das dann nicht nur ge- 
dreht, sondern auch links/rechts und 
oben/unten gespiegelt werden kann. Und 
es kommt noch mehr: Die normalen Apple- 
Shapes brauchen drei Bits, um einen Vek- 
tor zu definieren. Das macht die Sache 
umständlich und erlaubt normalerweise 
nur, zwei Vektoren in einem Byte uniterzu- 
bringen. (Die restlichen zwei Bits sind sel- 
ten zu gebrauchen, es sei denn, sie be- 
inhalten einen Vektor mit „Move to“.) Das 
Auto-Shape-System, das ich vorhabe, be- 
nötigt nur zwei Bits pro Vektor, so daß 
immer vier Vektoren in einem Byte Platz 
finden. Wer das nicht glaubt, soll es abwar- 
ten. Das System wird außerdem erheblich 
schnellere Shapes als das Applesoft- 
Shape-System bieten. 


2.5. Font-Editor 


Mit diesem Modul kann jeder seine eige- 
nen Schriften entwerfen. Es handelt sich 
hier nicht um einen Abklatsch von 
HIGHER TEXT, wo jeder Buchstabe genau 
dasselbe Blöckchen belegt. Bei diesen 
Fonts werden die Buchstaben eine belie- 
bige Größe bekommen, und jeder Buch- 
stabe wird in der Breite genau seinen zu- 
gewiesenen Platz belegen. Das nennt man 
variable Schrittbreite (oder drucktechnisch 
„Dickte“, Anm. d. Red.), d.h. das „I“ ist 
schmaler als das „M”. 





Bild 3: „Fipsi" 
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Endlich anspruchsvolle Camputer- 

grafik für BASIC-Programmierer! 

MiKkrocomputer Grafik 

- enthaält fast 80 lauffertige 
BASIC-Programme, die die be- 
schriebenen Grafikkonzepte 
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Die Qualität kommerzieller Arcade- F°— ; 
spiele Jäßt sich mit APPLESOFT BA- 

SIC alleine nicht erreichen Jeffrey Apple 1 \ 
Stanton führt in die Eigenartender | Raster Grafik 
hochauflösenden ÄApple-Grafik ein 
und präsentiert schließlich eine 
Reihe extrem schneller Assembler- 
Routinen, mit denen Sıe viele Effek- 
te bekannter Spiele selbst program-| 
mieren können. Gute BASIC-Kennt- 
nisse werden vorausgesetzt, eine 
Einführung in Assembler-Program- | 
| mierung wırd gegeben 
| 3-89058-006-8 2995. DM 49,-- Ri 
| komplett mit Disk DM 89,-- 
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h 22 Pascal-Programme, mit denen 
Sie Jdıe Grafık-Möglichkeiten Ihres 
Apple vol! ausschopfen: 
"DESIGNER" ermöglicht es Ihnen, ei- | 
gene Zeichensätze zu entwerfen, 
"GREDIT" unterstützt Sie beim Ent- 
werfen kompletter Bildschirm- 
brafiken; 

"PRINTFOTD" bringt Ihre Entwurfe 
aufs Papier Darüberhinaus bietet 

II das Buch errie Fülle fertiger Proze- 
duren, die Sie zeitsparend in Ihre 
eigenen Programme einbauen konnen 
3-89058-009-2 2805 DM 49,-- 
komplett mit Disk DM 89, -- 


5 Das Programm für das Handwerk. 
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2.6. Text-Editor 


Unter Verwendung der zu diesem Zweck 
geschaffenen Fonts kann man die Grafik- 
seite horizontal oder vertikal beschriften. 
Das ist in groben Zügen das, was die Graf- 
quattro-Serie bieten wird. 


3. DIE XPLOT-ROUTINE 


Und nun, um den Beitrag nicht so trocken 
ausgehen zu lassen, hier der erste Patch. 
Applesoft kann zwar den HPLOT-Befehl in 
verschiedenen mehr oder weniger 
brauchbaren Farben ausführen. Das Wich- 
tigste wurde aber außer acht gelassen: der 
„Exklusiv-oder“-Modus. An sich wäre es 
eine Kleinigkeit gewesen, ein HOOLOR = 
8 einzufügen. Platz genug war vorhanden, 
auch ohne andere Routinen zu beschnei- 
den, wie z.B. die HFIND ($F5CB), die von 
Applesoft sowieso nicht benutzt wird. Es 
hätte genügt, die zwei Patches für DRAW 
und XDRAW vernünftiger zu gestalten, 
womit man Platz für XPLOT sowie ein paar 
andere Kleinigkeiten geschaffen hätte. 
Aber ROM ist eben ROM, und uns bleibt 
nichts anderes übrig, als das Fehlende 
hinzuzufügen. Eine XOR-Linie braucht 
keine Farbbestimmung, weil sie immer 
zum vorhandenen Hintergrund negativ 
dargestellt wird. Es gibt selbstverständlich 
mehrere Möglichkeiten, dies zu bewerk- 
stelligen, auch effizienter als im Applesoft- 
Interpreter. Ich habe mich aber für eine 
modifizierte Applesoft-Routine entschie- 
den, da sie kürzer ist und in bekannter Art 
und Weise arbeitet. 


Die Routine - XPLOT.ROUTINE genannt 
— ist 181 Bytes lang, belegt den Speicher- 


XPLOT.DEMO 


REM XPLOT.DEMO 


platz unmittelbar nach der zweiten Grafik- 
seite, also von $6000 (24576) bis ein- 
schließlich $60B4 (24756), und kann fol- 
gendermaßen angesprochen werden: 
Vom Applesoft aus zuerst CALL 24576 
und danach HPLOT-Befehle wie üblich bis 
zum Ende der Programmzeile oder zum 
nächsten Doppelpunkt. Der CALL fängt 
sozusagen die darauffolgenden HPLOT- 
oder HPLOT-TO-Befehle ab und verarbei- 
tet sie selber. Damit kann man in Applesoft 
wie gewohnt programmieren. Ich könnte 
auch den Ampersand (&) strapazieren, ha- 
be dies aber bewußt nicht getan, da es 
eben nur ein kurzer Patch ist. Sind genug 
Patches für ein erstes Modul zusammen, 
kann man immer noch eine Tabelle mit 
sämtlichen &-Applesoft-Befehlen basteln. 
Das kleine Applesoft-Testprogramm - 
XPLOT.DEMO genannt - illustriert, wie es 
gemacht wird. Nur einige Worte zur letzten 
Applesoft-Zeile. Wer es nicht bereits weiß: 
Dies ist ein Trick, um die Grafikseite mit 
einer bestimmten Farbe zu füllen. In Spei- 
cherstelle 28 wird die sogenannte Color- 
Mask gepokt, und der CALL füllt die Seite 
mit der gepokten Farbe. 127 bedeutet hier 
weiß = 1. Im einzelnen gilt: 

schwarz 1 = 0 

grün = 42 

purpurrot = 85 

weiß 1 = 127 

orange = 170 

blau = 213 

weiß 2 = 255 

Selbstverständlich können auch andere 
Werte gepokt werden, die dann aber ver- 
schiedene Streifenmuster erzeugen. 


Für angehende Assembler-Freaks eine 
Aufklärung: Grafikpunkte und Linien funk- 


HIMEM: 8192:XP = 24576: HGR : 

POKE - 16382 ,68:0C = dB: A=-]1 

PRINT CHR$ (4); "BLOAD XPLOT,ROUTINE" 

HI = 158. X2 = JAuczs - 22 ra = I: 

Yl = 94:Y2 = Y1:Y3 = 96:Y4 = Y3 
A=A+1: IFA=2 THENA = 6: GOSUB 99 
FOR I = 1 TO 45: GOSUB 7T8:X1 = Xl - 2: 
2 =XK2 + 2:ıX3 = X3 + 2:X4 = KA — 2: 
Ye) ae ZN = 2:5 No 


Y4 = YA + 2: NEXT !: 


GOTO 4B 


GALLE SPESHELOT Al,2 I TO R2,r2 7023.73 
TO %X4,Y4 TO X1,Yl: RETURN 


REM Das ist ein Trick! 


C= + 127 x (C =): POKE 28,C: 


CALL 62454: RETURN 


18 





tionieren unter Verwendung aller drei A-, 
X- und Y-Register mit Hilfe einer Routine 
namens HPOSN, die die Aufgabe hat, ei- 
nen unsichtbaren Cursor auf der Grafiksei- 
te zu positionieren. Außerdem wird der 
zuletzt geplottete Punkt zwischengespei- 
chert, so daß anschließende Linien mit 
„TO“ gerufen werden können. Die drei 
Register reichen aus, da der X-Koordina- 
tenwert zwar mehr als acht Bits braucht, 
für den Y-Koordinatenwert 8 Bits aber völ- 
lig genügen (max. 191). Merkwürdigerwei- 
se gitt für die Cursorpositionierung 
(HPOSN) und das evtl. folgende HPLOT 
folgende Registerbelegung: 

(1) 

Im A-Reg. der Y-Wert 

Im X-Reg. der X-Low-Wert 

Im Y-Reg. der X-High-Wert 

Nach der Positionierung des Cursors oder 
nach einem ersten HPLOT für eine darauf 
folgende Linie ist statt dessen folgende 
Belegung vonnöten: 

(2) 

Im A-Reg. der X-Low-Wert 

Im X-Reg. der X-High-Wert 

Im Y-Reg. der Y-Wert 

Für den Assemblerprogrammierer bietet 
die XPLOT-Routine drei Entry-Points, die 
im Source-Listing mit EP1, EP2 und EP3 
markiert sind. 

EP1 = $601D ist XPOINT, und die Regi- 
sterbelegung ist die übliche wie bei (1). 
EP2 = $6039 ist XLINE mit derselben 
Registerbelegung wie XPOINT. Die dar- 
auffolgenden Zeilen besorgen den nötigen 
„Swap“. 

EP3 = $603F ist XLINE mit der üblichen 
Applesoft-Registerbelegung, wie 
(2): 


Das war es vorläufig. 
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Bild 4: „Die zarteste Versuchung..." 
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coJoaamßPAWNWDH 


PrerrtrerterH 
491 RAD Hm 


ORG $6B6% 


XPLOT.ROUTINE 


Eine modifizierte Version der 
Applesoft-HPLOT-Routine, um 
XPLOT zu ermöglichen. 


x 
* 
“ 
* 
* von N.G.Barbieri, 1985 
* 
+ 
* 
* 


* 

COLON EQU $3A pen 
HPLOT EQU 993 ;Token 
TO EQU $c1 ; Token 
CHRGOT EQU $B7 
SYNCHR EQU $DECH 
HENS EQU $F6B9 
HPOSN EQu $PrAll 
LFTRT EQU $F465 
UPDOWN EQU $FAD3 
* 

# 


;Farse 


LDA #<COLON 
JSR SYNCHR 
LDA #<HPLOT 
JSR SYNCHR 


;5yntax 
‚Check 


JSR CHRGOT 
CMP _ #TO 
BEQ DOLINE 
JSR HFNS 
PHA 
JSR CHRGOT 
CMP #<TO 
BEQ AXLINEIl 
PLA 

XPOINT Reg.-Belegung: 

= Y-Wert 

XL-Wert 
= XH-Wert 


A-Reg. 
X-Reg, 
Y-Reg. 


xEkkkıakrr KR 


JSR HPOSN ;EPl 
LDA 839 

AND #$7F 
JMP $F46P 


; jetzt 
:XPOINT 
* 
XLINEL PLA 

JSR HPOSN 


;APLOT 

‚Beginn 

* 

ALINEZ JSR CHRGOT 
CMP _ #+TO 
BEQ DOLINE 
RTS 


;{PLOT TO 


JSR SYNCHR 
JSR HFNS 


XLINE 1 - Reg.-Belegung: 
= Y-Wert 


XL-Wert 
= XH-Wert 


A-Reg. 
X-Reg. 
Y-Reg, 


STY $9D :EbZ 

TAY 

TXA ;Reg. 
LDX $9D :Swap 


2 - Reg.-Belegung:! 


= XL-Wert 
XH-Wert 
= Y-Wert 


PHA 
SEC 
SEC 
PHA 





Sad: 
6845: 
64T: 
6049: 
6B4B: 
SBAC: 
ShAE: 
685%: 
6651: 
6653: 
6855: 
6057: 
6ß59: 
SB5A: 
6B5C: 
SÖSE: 
GÖSF: 
6ß6l: 
6063: 
6064: 
6B65: 
6B6T: 
6969: 
6B6B: 
6BED: 
SÄÖ6F: 
6BT71: 
6973: 
6974: 
6976: 
6977: 
6979: 
BOTB: 
697D: 
6AT7F: 
6881: 
6982: 
6B85: 
6AB6: 
688: 
GOÄ: 
6ÄBC: 
6ÖBE: 
GBR: 


6992: 
6094: 
6996: 
6998: 


6B9A: 
6B9B: 
6ASD: 
GAY9F: 
6BAl: 
6BAZ: 
6BAS5: 
6BAB: 
6BAS: 
6BAB: 
GBAD: 
6BAF: 
6Bl: 
6ßB3: 


131 Bytes 





45 
29 
51 
9] 


E8 
DB 
E6 
Fo 
AB 
Bß 
29 
18 
AB 
65 
85 
AB 
65 
59 


El 
D3 
DA 


FF 
p1 


BB 
D3 
D1 
D5 


DB 


EB 
El 


E2 
BA 
FF 
FE 
D2 
E2 
D3 


D9 


FF 
Dl 
1D 


85 
65 


D4 
D2 
DA 
D5 


D5 


30 
7F 
26 
26 


d4 
1D 
8A 
D3 
DC 
D3 


DA 
D® 
DA 
D5 
D1 
DB 


FA 


FA 


8l 
82 
83 
84 
85 
86 
87 
883 
89 
=) 
91 
92 
93 
94 
95 
96 
Ft 
38 


188 
181 
182 
163 
104 
185 
186 
187 
198 
189 
118 
111 
112 
113 
114 
115 
116 
117 
118 
119 
128 
121 
122 
123 
124 
125 
126 
107 
128 
129 
138 
131 
132 
133 
134 
135 
136 
137 
138 
139 
149 
141 
142 
143 
144 





ALIN2 


ALIN3 


MOVEX 


MOVEXZ 


HCOUNT 
* 


ALINA 


TXA 
SBC 
STA 
BCS 
PLA 
BOR 
ADC 
PHA 
LDA 
SBC 
STA 
STA 
PLA 
STA 
STA 
PLA 
STA 
STX 
TYA 
CLC 
SBC 
BC 
EOR 
ADC 
STA 
STY 
ROR 
SEC 
SBC 
TAX 
LDA 
SBC 
STA 
LDY 
BCS 
ASL 
JSR 
SEC 
LDA 
ADC 
STA 
LDA 
SBC 
STA 


LDA 
AND 
EOR 
STA 


INX 
BNE 
INC 
BEQ 
LDA 
BCS 
JSR 
CLC 
LDA 
ADC 
STA 
LDA 
ADC 
BVC 





$El 
$D3 
XLIN2 


#$FF 
#51 


#50 
$D3 
$D1 
$D5 


$DP 
$D4 


$Eß 
$El 


$E2 
XLIN3 
#$FF 
+$FE 
$D2 
$E2 
$D3 


$DP 


+$FF 
$D1 
$1D 
$ES5 
MOVEX2 


LFTRT 


5D4A 
$D2 
$D4 
$D5 
+$9 
$D5 


$30 ;Sim 
+$7F ;Salabin 
($26),Y 

($26),Y 


ALINA 
$1D 
XLINE2 
$D3 
MOVEX 
UPDOWN 


$D4A 

$D9 

$DA | 
$D5 

$D1 | 
HCOUNT 
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Der beschriebene Generator soll dem 
Benutzer die langweilige und zum Teil 
nervende Arbeit der Herstellung von 
Textseiten („Menüs“) auf dem Bild- 
schirm abnehmen: Der Benutzer 
schreibt sein Menü „life“ auf den Bild- 
schirm, der Generator erzeugt aus dem 
vorgegebenen Bild ein Basic-Pro- 
gramm, das beim Ablauf gerade dieses 
Menü liefert. Textpassagen können als 
INVERSE, NORMAL oder FLASH ge- 
kennzeichnet werden, GET- und IN- 
PUT-Befehle werden nach Benutzer- 
wunsch ebenfalls eingebaut, eine Bild- 
schirm-Einrahmung ist leicht realisier- 
bar. Die erzeugten Basic-Zeilen werden 
möglichst kurz gehalten. Zugrunde 
liegt das Betriebssystem DOS 3.3 und 
40-Zeichen/Zeile-Darstellung. 
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Viele Programme neueren Datums sind 
menü-gesteuert, d.h. sie liefern dem Be- 
nutzer nach dem Start eine Übersicht über 
die verschiedenen \Wahlmöglichkeiten 
(options) und bieten im allgemeinen hier- 
für Ersatzwerte (default values) an. Der 
Benutzer kann, sofern nötig, einzelne 
Werte ändern. Verlangt ein Programm um- 
fangreiche Eingaben, so sind oft mehrere 
Menü-Seiten erforderlich. 

Für das Herstellen solcher Menüs ist es 
deshalb notwendig, die erläuternden Texte 
in sinnvoller Reihenfolge und gut struktu- 
riert auf dem Bildschirm erscheinen zu 
lassen und anschließend die Benutzer- 
wünsche abzufragen. Die Programmie- 
rung solcher Menüs ist zwar nicht schwie- 
rig, oft aber eine zeitraubende und auf- 
wendige Routine-Arbeit. 

Eine effiziente Lösung dieser Problemstel- 
lung ist die Benutzung eines Generator- 
Programms: Man schreibt per Tastatur das 
Menü-Bild (alle Texte und sonstigen Zei- 
chen) auf den Schirm, hebt dort, wo es 
notwendig erscheint, Zeichenketien z.B. 
mit INVERSE hervor und markiert die Posi- 
tionen für spätere GET- und INPUT-Be- 
fehle. Aus diesen und einigen anderen 
Informationen erzeugt der Generator ein 
entsprechendes Basic-Programm. 
Vorteile dieser Methode: Man sieht sein 
Menü „life“, Korrekturen jeder Art sind 
leicht möglich, jegliches Abzählen von 
Zeilen oder Spalten entfällt, das erzeugte 
Programm läuft auf Anhieb fehlerfrei und 
läßt sich problemlos in ein bestehendes 
Programm integrieren. Sogar aufwendige 
Menüs erfordern wenig Zeit. 


De nanerataı 
für den Apple Il 


von Dr. H. Kersten 








Man kann den Generator auch zur Erzeu- 
gung einfacher (aber umfangreicher) Text- 
ausgaben und für „Text-Grafik“ (‚Bilder‘ 
mit normalen Druckzeichen) verwenden. 


Arbeiten mit dem Generator-Programm 


Nach dem Starten des Programms ME- 
NUE.GENERATOR werden zunächst fol- 
gende Parameter abgefragt: 

1. Menü-Größe in Zeilen « Spalten (Er- 
satzwerte und Maximaiwerte 24 x 40) 

2. Zeilennummer der ersten zu erzeugen- 
den Basic-Zeile (Ersatzwert 100) 

3. Zeileninkrement (Ersatzwert 10) 

4. Name, Slot und Drive eines Texffiles, 
auf dem das erzeugte Basic-Programm 
abgelegt wird (Ersatzwerte: MENUE/S6/ 
BT): 

Will man alle Ersatzwerte übernehmen, so 
gibt man auf die Frage nach Änderungen 
N(ein) ein. Im anderen Fall trägt man die 
gewünschten Daten ein; einzelne Ersatz- 
werte übernimmt man durch Eingabe von 
„RETURN“. Soweit wie möglich werden 
die Eingaben auf formale Korrektheit über- 
prüft. 

Nachdem für alle Optionen Werte festlie- 
gen, wird der Bildschirm frei, der Cursor 
erscheint oben links, der Editier-Vorgang 
kann beginnen: Man gibt nun alle Texte 
und Zeichen ein, die das Menü ausma- 
chen - jeweils an der richtigen Schirmpo- 
sition. Hierbei kann man folgende Kontroll- 
funktionen/-tasten benutzen: 


Cursor-Positionierung: ESC mit I, J, K, 
M wie beim Apple-Monitor, Ctri-H Cursor 
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links, Ctrl-U Cursor rechts. Überfahrene 
Zeichen bleiben stets erhalten. Return 
geht zum Anfang der nächsten Zeile, ohne 
die Zeichen rechts vom Cursor zu lö- 
schen. Es findet kein Scrolling statt: Der 
Cursor springt vom Schirmende zum 
Schirmanfang. 


Darstellungsart: Nach Ctrl-| werden wei- 
tere Eingaben als INVERSE markiert, nach 
Otrl-F ais FLASH, nach Ctrl-N wieder als 
NORMAL. Das jeweilige „Ergebnis“ sieht 
man unmittelbar. 

Spaltentransfer: Nach Ctrl-T wird in der 
Zeile des Cursors das Zeichen der 1. 
Spalte in die letzte Spalte übernommen. 
Durch Festhalten von Ctri-T laßt sich somit 
die komplette 1. Spalte übertragen. Die 
Darstellungsart wird dabei berücksichtigt. 


Eingabe-Befehl: Ctr|-G markiert die Posi- 
tion für einen GET-Befehl, Gtrl-P für einen 
INPUT-Befehl. (Als Markierungszeichen 
werden [ und ] bzw. Ä und Ü ausgege- 
ben.) Diese Befehle werden später in der 
zeitlichen Reihenfolge durchlaufen, in der 
sie eingegeben wurden. Die GET-Befehle 
werden mit Variablen C0$, C1$, ..., die 
INPUT-Befehle mit VO$, V1$, ... „program- 
miert“. Die Interpretation dieser String- 
Variablen (vom Benutzer zu programmie- 
ren) sollte im Zielprogramm unmittelbar 
hinter dem Eingabe-Befehl erfolgen. Maxi- 
mai sind 256 Eingabe-Anweisungen mög- 
lich. 

Korrekturen werden durch Überschrei- 
ben ausgeführt; gelöscht wird also mit 
Leerzeichen. Gtrl-W löscht den gesamten 
Schirm und alle Markierungen. 


Der Generiervorgang wird durch Ctri-S 
gestartet (Cursor-Position ist belanglos!). 
Mit Ctrl-W plus Ctrl-S kann man jederzeit 
aus dem Programm aussteigen, ohne daß 
das Disk-Laufwerk angesprochen wird. 


Am Ende der Verarbeitung erhält man In- 
formationen über die „verbrauchten" Zei- 
lennummern; hier kann ohne erneutes 
Editieren eine Generierung mit veränder- 
ten Parametern abgerufen werden. Das ist 
auch für folgenden Fall wichtig: Die Zeilen- 
nummern dürfen beim Applesoft-Interpre- 
ter den Wert 63999 nicht überschreiten. 
Letzteres wird vom Menü-Generator im 
Einzelfall überprüft und ggf. angezeigt. 
Soll das erzeugte Menü-Programm in ein 
schon vorhandenes Programm eingebaut 
werden, so ist dies mit LOAD... zu laden 
und danach dann mit EXEC... das Menü- 
Programm einzulesen. Das Gesamtpro- 
gramm wird dann mit SAVE... gespeichert. 
(Unter Umständen kann in den einzelnen 
Phasen ein RENUMBER-Programm nütz- 
lich sein.) 
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Zur Funktion des Generators 


Im Programm-Listing sind die einzelnen 
Funktionsblöcke durch REM-Zeilen über- 
schrieben. 

In der Editierphase wird je nach Kontroll- 
zeichen der Cursor bewegt oder die jewei- 
lige Funktion (z.B. Spaltentransfer) ausge- 
führt. Liegt kein Kontrollzeichen vor, so 
wird das eingegebene Zeichen in eine 24 
* 40 Matrix (SC$) eingetragen, der zuge- 
hörige Darstellungstyp in der Matrix DM 
(0 für NORMAL, 1 für INVERSE, 2 für 
FLASH) vermerkt. 

Alle benutzten Zeilen werden in ZM mar- 
kKiert, die höchste Zeilennummer in ML 
vorgemerkt. Durch diese Maßnahmen wird 
die Generierung zum Teil erheblich be- 
schleunigt. 

Die Programmierung von „GET“ und „IN- 
PUT" geschieht durch Eintragen dieser 
Funktionen in die Tabelle IM (Typ 1 = GET 
/2 = INPUT, Zeile, Spalte). 

Ein Detail-Problem bedarf noch der Er- 
wähnung: Wird in die rechte untere Bild- 
schirmecke ein Zeichen über PRINT aus- 
gegeben, so schiebt der Apple-Monitor 
den Bildschirm-Inhalt um eine Zeile nach 
oben (Scrolling), was hier stets uner- 
wünscht ist. Es läßt sich dadurch vermei- 
den, daß beim Editieren wie auch beim 
erzeugten Basic-Programm statt PRINT 
ein POKE 2039,... verwendet wird. Hier- 
durch wird das Zeichen für diese spezielle 
Schirmposition direkt in den Bildschirm- 
Puffer geschrieben. 

Nach Ende der Editierphase werden nun 
die Bildschirm-Matrix SC$ und parallel da- 
zu die Darstellungsmatrix DM Zeichen für 
Zeichen abgetastet und in PRINT-Befehle 
umgesetzt — unterbrochen durch Anwei- 
sungen wie VTAB, HTAB, NORMAL, 
FLASH und INVERSE. Ein besonderes 
Kapitel ist dabei die Darstellung von Leer- 
zeichen, die ja im Menü-Bild im allgemei- 
nen in großer Zahl auftreten. Sie werden 
vom Generator am Zeilenanfang mit 
HTAB, in der Zeilenmitte als String oder 
über die TAB-Funktion realisiert. Die Opti- 
mierungsroutine (Zeile 6000-7000) findet 
stets die kürzeste Möglichkeit. 
Schließlich: Treten Anführungszeichen (“) 
im Menü auf, so werden sie in „CHR$ 
(34)“ umgesetzt. Den Abschluß der Ge- 
nerierung bildet die „Programmierung“ 
der Eingabe-Befehle. 


Testbeispiel 


Bevor man mit einem Test beginnt, sollte 
in jedem Fall eine Programmsicherung 
stattfinden. Zur direkten Überwachung des 
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Generator-Outputs kann man vor dem 
RUN-Kommando noch MON O eingeben. 
Nach dem Start antwortet man auf die 
erste Frage (nach Änderung der Ersatz- 
werte) mit N (= Nein). Danach gibt man 
etwa ab 1. Zeile folgendes Testbeispiel ein 
(Funktionen sind in <...> angegeben, 
<Ctrl-I> z.B. bedeutet dabei gleichzeiti- 
ges Betätigen der Ctrl- und der I-Taste). 


<reiurn> 

<retum> 

NORMAL<Treturn> 
<Ctrl-I>INVERSE<return> 
<Ctrl-F>FLASH<return> 

<reiurn> 

<reiurn> 

<Otri-N>TEST FÜR GET...:<Ctrl-G> 
<reilurn> 

<reiurn> 

TEST FÜR INPUT..:<Ctrl-P><return> 
<reiurn> 

* TRANSFER-TEST <Ctrl-T><Otrl-S> 


Der Generator-Output sollte dann die fol- 
gende Form haben: 


LOSTEXTZHOME 

110 VTAB 3: HTAB 1: REM x##3x%* 
120 NORMAL : PRINT "NORMAL"; 
130 VTAB 4: HTAB 1: REM xx4x* 
140 INVERSE : PRINT "INVERSE“; 
150 VTAB 5: HTAB 1: REM #x5x* 
160 FLASH : PRINT "FLASH“: 

170 VTAB 8: HTAB 1: REM ##x8x** 


180 NORMAL PRINT “TEST FÜR 
Geh. 

190 VTAB 10: HTAB 1: REM x#10x%* 

200 NORMAL PRINT ZTEST EUR 
INZUN 


210 VTAB 12: HTAB 1: REM ##12x* 

220 NORMAL : PRINT "x TRANSFER- 
TEST”; TAB( 40); °*"; 

230 VTAB 8: HTAB 19: GET C0$: PRINT 
C0$; 

240 VTAB 10: HTAB 19: INPUT VO$ 


Zur Kontrolle des Disk-Files gibt man der 
Reihe nach folgende Anweisungen ein: 
NEW — EXEC MENUE — LIST. Kontrolle 
des Menü-Bildes: RUN. Ein erster größe- 
rer Test könnte darin bestehen, das Start- 
Menü des Generators selbst „nachzu- 
bauen“. 

Für sehr detaillierte und umfangreiche Me- 
nüs kann die Generierzeit im Bereich von 
60 Sekunden liegen. Besitzt man einen 
Basic-Compiler, so kann diese Zeit erheb- 
lich (auf unter 20 Sekunden) reduziert 
werden. 

Bei so vielen Menüs bleibt nur noch „Gu- 
ten Appetit” zu wünschen. 
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1999 
1819 
1828 







1039 
194% 







1959 
1969 







1878 
2809 
2010 








2028 
2838 
2040 
2959 
2B6P 
2970 
2080 












2998 
2108 
2118 
2128 
2139 
2149 
215% 
2280 













2218 
2229 
2236 








2240 
225% 
2268 
2270 
2280 
2299 
2360 
2400 
2418 
2420 
243% 
2440 
2588 
2518 
260% 
2818 
262® 
2630 
2708 
2718 
2720 
2738 
2749 
2800 
2810 
2828 
2988 






















2919 
2928 







sdpp 
3019 
3928 








3050 





3849 
3058 
3055 
306% 
3978 








3080 
3990 







3189 






311ß 
3129 
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MENUE.GENERATOR 


REM ---Startwerte/Parameter-—— 

DIM CB$(19) ,ZM(24) ,SC$(24,4®),DM(24,49),IM{255,3) 
DATE 27.73 74, 75.77 3,21.13,29,9,14,19, 7,16, 31, 
93,34,6,23 

FOR I = 1 TO 19: READ X:CB$ (I) = CHR$ (X): NEXT 
NL = 24:NC = 49:5L = 1B6:IN = 18: FI$ = "MENUE": 
ST = 6:DR = 1:R$ = CB$(8) 


OF(ß) = 128:0F(1) = - 64:0F(2) = 9 

TX${(ö) = " NORMAL ":TX$(1) =" INVERSE !: 
Tx$(2) = " FLASH " 

GOSUB 7989 

REM ---Editierung des Menü-Bildes-—- 


TEXT : HOME :LC = 1:CC = 1:ML = B:DA = B:EM = $: 
NORMAL 

GET C$ 

IF EM = 1 THEN 211 

IF C$ = CB$(l) THEN EM = 1: GOTO 2928 

IF ASC (C$) > = 32 THEN 2290 

FOR I=6 T0 19 

IF C$ > < CB$(I) THEN 2999 

ON I - 5 GOTO 2419, 2420, 2449, 2500, 2600,2619,301ß, 
2700 ,2710,2200 ,,2200, 2209, 2629,2909 

NEXT I 

PRINT CHR$ (7);: GOTO 2929 

BOR LE. 21.705 

IF C$ > < CB$(I) THEN 2149 


ON I COTO 2029, 2490, 2419, 2420 ,2430 

NEXT I 

EM = d: GOTO 2829 

SCHILC,.CE) = CH: IE (ES > <= N TOR DA d) AND 
C$ > < ""! THEN ZM{LC}) = 1] 


TE mE =. LC THEN ME = 66 

DM(LE.CE) DA 

IF LC = 24 AND CC = AB AND C$ > < "" THEN GOSUB 
936: POKE 2839, AS:CC = CC + 1: GOTO 2250 

PRINT ($;:CC =CC +1 

IFCC <= 6 THEN LE = LC - 1:00 = NC 

IF CC >NC THENLE = LC + 1:0C=1 

IF LE <= 8 THEN LC = NL 

IF LC > NL THEN LC = 1 

IF TM=1THEN CC = CC + 1:TM = 9 

HTAB CC: VTAB LC: GOTO 2029 

LE = LE = 12.6010.2259 

Ce=ce 1er 070 2259 

CC = CC + 1: GOTO 2250 

LC = LC + 1: GOTO 2259 

LE = Le + Tee 21. 801022509 

C$ = SC$(LC,1):DA = DM(LC,1): HTAB NC:CC = NC:TM = 1 
GOSUB 28##9: GOTO 2298 

DA = 1: GOTO 2639 

DA = B: GOTO 2639 

DA =2 

GOSUB 2889: GOTO 2829 
GOSUB 2738: IM{IC,®) = 1:C$ 
GOSUB 2738:IM(IC,ß) = 2:C$ 
IM(re.1) = Lem. 2) 6 
IF IC < 256 THEN RETURN 
PRINT CHRS 17), 05 = U SPORE: 
IF DA = ® THEN NORMAL : RETURN 
IF DA = 1 THEN INVERSE : RETURN 
FLASH : RETURN 

HOME : VTAB 12: HTAB 14: NORMAL : PRINT 


= 6B$(157: COTO 2720 
= CB$(16) 
C:IC = IC + 1: GOTO 2249 


GOTO 2249 


TOLEARING „ae" 

FOR I = 1 TO ML:ZM(iI}) = 9 

FOR J = 1 TO 48:Sc$(I,J) = "":DMIL.J]) = B: NEXT J: 
NEXT I:IC = 9: GOTO 201® 

REM -—--Generierung der Basic Zeilen-— 

TEXT : HOME : IF ML = ß AND IC = ® THEN END 


VTAB 14: HTAB 8: FLASH 


PRINT "BITTE WARTEN "::1Z(ß) = 8:I1Z(1} = 9 
NORMAL : VTAB 18: HTAB 8: 

PRINT "ZEILE ß® WIRD BEARBEITET" 

NORMAL : GOSUB 95ßß:PK = B:DA = — 1:LN = SL 


PRINT R$:LN;'" TEXT:HOME";:LN = LN + IN 

IF ML = ® THEN 4519 

FOR I = 1 TO ML:: IF ZM(I) = Ö THEN 3239 

zu = Inz (1 7 190) 22 ZI zZ % 18: POKE 1245,176 + 
21: POKE 1248 176 + 22 

GOSUB 561®: IF N2 < Nl THEN 323% 

IF I= 24 AND N2 = 40 THEN N2 = 39: PK = 1: 

IF Nl = 48 THEN 3239 

PRINT R$;LN; "VTAB";I:":HTAB" N]; ":REMR&" 1,8: 
LEN = LN # IN 

PC = 6:PM = B:BC = B:0C 
EOR J„= NI TO N2 


B 








313® 


3149 
3159 
316® 
3170 
3180 
3190 
3209 
321% 
3220 
3230 
Aadan 
Ad19 
4020 
Aad5ß 
AdAß 
4500 
451ß 
4529 
4536 
4540 
4550 


4569 
4578 
458B 
4599 
5ß0% 
501® 
5929 
593% 
5040 


5050 
5B6d 
507% 
5980 


5 
519 
SBRB 
6199 
61lf 
6129 
6138 
6149 
615% 
6169 
817% 
620% 
621 
6228 
63#8 
6316 


6320 
64A0# 
6Alß 
6420 
6438 
7808 
7819 
7928 
7958 


7849 
7859 


Tösd 


7878 
7888 


7899 


7188 
7119 


7120 
7138 


7149 





IF DA > < DM(I,J} THEN GOSUB 61ß9:PM = B:0C = B: 
DA = DM(I,J): PRINT R$S;:LN;TX$(DA)::LN = LN + IN 


c$ = SC$(1,J) 

IF PM = 6 THEN PRINT ": PRINT ";:PM = 1 

IFC$= " " OR C$ = "" THEN BC = BC + 1: GOTO 3290 
IF C$ = CB$(17) THEN GOSUB 6199: GOTO 641® 

ON PC + 1 GOSUB 6209,630% 

PRINT C$,:PC = 1 

NEXT J 

DL=DA:DA= - 1 

GOSUB 6199 

NEXT I 


REM -—-Zeile 24, Spalte 48—- 

IF PK = ® THEN 4948 

DA = DM(24,49):C$ = SC$(24,49): GOSUB 9399 
PRINT R$;:LN:;" POKE 2839, '"5AS;:LN = LN + IN 

IF DL > < 8 THEN PRINT R$;LN;TX$(8);:LN = IN + IN 
REM ---Programmierung der Eingabe-Befehle--- 
IF IC = ß THEN 459 

FOR I=9 TO IC - 1 

ID = IM(I.6) - | 

PRINT RS:LN: "VTAB";IM(I,1);":HTAB";IM(I,2);":"5 
IF ID = ® THEN PRINT " GET 0"; 1IZ(B);"$: 

PRINT C";IZ{B);"$;";: GOTO 4579 

PRINT " INPUT V";IZ(1):"$"; 

IZz(ID) = IZ{ID) + L:LN=LN+ IN 


NEXT I 
PRINT : PRINT D$;"CLOSE": GOSUB 8899: END 
REM ---Zeile eingrenzen-—- 


NI = NC:N2 = 1 
FOR N = 1 TO NC 
s1$ = SC$(I,N) 


IF SI$ > < "tm AND (SI$ > < " H OR DMILLN) > < 9) 
THEN N1 = N: GOTO 5A6d 
NEXT N 


FOR N = NC TO 1 STEP - 1 
S2$ = SC$(I,N) 


IF S2$ > < "" AND (S2$ > < " " OR DM(L,N) >< 9) 
THEN N2 = N: GOTO 519® 

NEXT N 

RETURN 

REM ---Abschließen/Optimieren der Strings--- 

IF PC = 1 THEN 615ß 

IF BC ö THEN 61798 


IF BC < = 4 THEN PRINT CB$(17); SPC(BC);CB${17);";:"; 
IT BE - 4 THEN PRINT TABL Se 

GOTO 6170 

IF BC <= 7 THEN PRINT SPC(BC);CB${17);":"; 

IF BC > 7 THEN PRINT CB$(17);";TaB(";9;")5"5 

BC = 6:PC = B: RETURN 

IF BC < = 7 THEN PRINT CB${17}; SPC(BC); 

IF BC > 7 THEN PRINT "TAB{":J;");";CB$(17); 

BC = ß: RETURN 

IF BC < = 18 THEN PRINT SPC(BC)}; 

IF BC > 18 THEN PRINT CB${17);":TAB(",J;")5"5 
CB$(17); 

BC = ß: RETURN 

REM ——-Bearbeiten von >"<--- 

QC = QC + 1: IF QC < 2 THEN PRINT "CHR$(34);";: 
GOTO 3209 

QOC = B: PRINT R$;LN;'" PRINT CHR$(34});";:LN=LN + IN 
GOTO 3290 

HOME : REM -—-Menü 1-——- 


INVERSE : PRINT SPC(39);: GOSUB 9188: PRINT SPC(1B}; 
INVERSE : PRINT "MENUE-GENERATOR"; : GOSUB 91dB 
PRINT !' Änderung der Ersatzwerte [J/N}? une 
GOSUB 91$8 

PRINT " Ersatzwerte sind :";: GOSUB 919® 

PRINT " Bildschirm/Zeilen : ";: INVERSE : 
PRINT NL; : GOSUB 92B®% 

PRINT SPC{14);"Spalten : ";: INVERSE : PRINT NG;: 
GOSUB 9199 

PRINT " Basic-Programm/";: GOSUB 9209 

PRINT SPC(18);"1,.Zeilennr, : ";: INVERSE : 

PRINT SL;: GOSUB 9296 

PRINT SPC(1®) ;"Inkrement : 15: INVERSE : 


PRINT IN; : GOSUB 910 


FRINT " Menü-(Exec-)File/";: GOSUB 9288 

PRINT SPC(16);"Name ; '";: INVERSE : PRINT FI$;: 
GOSUB 91 

PRINT SPCI(16):"S1ot "+: INVERSE : PRINT ST;: 
GOSUB 9299 

PRINT SPC(16) ; "Drive : 1». INVERSE : PRINT DR;: 
GOSUB 9199 

INVERSE : PRINT SPC(39);: NORMAL 


VTAB 5: HTAB 37: GET 06$: PRINT Cß$; 
IF Cö$ = "N!" THEN RETURN 
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MICROMINT | 


\4ıcromın 
LLTREFFER 
LASAR 16 


— IBM Comp. 64 K, Contr. Bootrom 


TEAC FD 55 B 
3.800; 













GT 





MITTE Netzteil 15 A 


LASAR ZE 


— Apple comp. 64 K + 


12KROM + 1.365; 


6502 + Z80 A 

Außerdem volles Rückgaberecht innerhalb 
14 Tagen ohne Begründung. 

Apple 


@ Mehrzweckgehäuse It. Abb. 209,— 
® Schalitnetzteile Apple5 AlIBM15A 115,— 





IBM 
| 350,— 







® Profitastatur dtsch. LASAR 2000 365,— | 365,— 
@ Interface ab 95,- | 400,— 
® Drucker Epson komp. !!! 898,— | 898,— 


Prompte Belieferung von 100 m? Lagerfläche. 
Kostenlose Tiefstpreishändlerliste noch heute 
schriftlich anfordern — großes Angebot an 
IBM-Comp. 


Generalimporteur MICROMINT Computer GmbH 
Hochdahler Straße 151, 4006 Erkrath 2 
Telex 8589305 mcm 


= 02104/33024 





ccp datentaechnik 


640 KByte-Drives für Apple Il (//e) 


@ 5'/,- od. 3'/,-Zoll-Format (Teac FD55/35-F) 

® Umschaltbar auf 40 Track (Apple kompatibel) 

® Patch für DOS 3.3, UCSD-Pascal, CP/M 2.2, CP/M 2.23 
(60K), PRODOS, AP22, ALS CP/M+ 

@ Umfangreiches Manual 

® Anschlußfertige Auslieferung 

@ Ehring-Contr.-Kabel u. 2 Drive (1.2 MB). 


Festplatten für Apple Il (//e) 


@ 5'/, Zoll-Format (Slimline) 

@ Booten direkt von der Festplatte 

® in DOS 3.3, UCSD-Pascal, PRODOS und CP/M 2.2 

@ läuft auch mit unseren 160 Track-Drives 

® Copy-Programme im Lieferumfang 

® Umfangreiches Manual 

® Festplatte (5 — 11,2 MB netto) incl. Controller, 
Netzteil und Patchsoftware . er 








DM 1775,— 


ab DM 3250,— 
Akustikkoppler für Anple I (//e) 
® Serielle und Modem auf einer Karte 


@ Hörerverbindung wird mit Kabel herausgeführt 
@ 300 u. 600 Baud voll- u. halbduplex 

@ Originate und Answermode 

© CCITT-Norm (V21) u. Bell 103 (DFÜ weltweit) 
@ ASCII-Express, Modem 7 usw. lauffähig 

® Leerplatine incl. ROM, Bausatz oder se 


® Fertiggerät + Manual . ‚ DM 398,— 





Alles für Ihren Apple 


Info bel: 


ccp datentechnik 


Herderstraße 12 — 2000 HH 76 
Telefon 0 40/22 56 76 
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ZUSATZ-KARTEN: 

V-24-Schnittstelle ....-.-.-.» » - - 199,- Z-80-Karte ........2=.e2000.: 139,- 
80-Zeichen-Karte m.Softswitch 236,- 16 K-Language-Karte ......... 188,- 
Centronics-Karte von Epson für Graphik... . 210,- für Text....145,- 
Eprommer inch. Software aaaaasaneseeeeeeeeee nenn BET. 198,- 
Floppy-Controller 
FDC 4 für alle Läufwerke ....... 199,- Bausatzwielinks ............ 179 ,- 
Leerplatine wie oben incl. Promu. Eprom „susessssssr sr HH rn 130,- 





„‚Autopatch- -Controller (ephi Controlier) 








1x35bis2x BO Tr.-Disk, keine Patch-Disk notwendig, Patch DOS 3.3, Diversi- 
DOS2-C on MOVER), Pascal 1.1, Pascal 1.2, CPM 2.2, ProDOS 
1.0.1; 1. 1, 1.1.1, Sie können die Laufwerke untereinander mischen 98, f 
JoyStickDeLluxe .....+..4..- 59- NetztellSA ..-..-2uer 000000. 1, - 
Halbschalen-Gehäuse für ? Slimline-Laufwerke ...»---s@ssansnnnnnn.. 65,- 
Gehäuse für 15%" Slimline Laufwerk ..cucseeeensseranenenee nenn 39,- 
Gehäuse für 2 5%" Slimline Laufwarke mit Platz für ein Netzteil ......... 159,- 
TEN E a ne akrela eiala a Woerminian 229,- 
 Floppy-Kabel 34pol. für 2 Laufwerke mit Shugart-Bus .....ancnncanann 35,- 





Preh Commander Keybasızs 
Wir bieten Ihnen die Preh-Qualität auch für Apple. AK 88 Spez. mit Gehäuse, An- | 


schlußkabel, Zehner-Tastenfald, dt. Zeichensatz, Sondertäasten für 
Ötri-CGodes und Rechenfunktionen . ..339, u 


TEAC 3%" Laufwerk FD 35 


Speicherkapazität 1 MB, (formatiert 640. KB) jetzt fürnur u. 579,- 


LE = 
















Nochmalige Preissenkung beit TEAC: 


TEACFD55 A 1x40 Track . ‚ 498,- TEACFD55B2x40 Track ..... 579,- | 








TEACFDSSEIx80 Track ... 535,- TEACFDS5SF2x80 Track ..... 638,- 

Philipps Slimline Floppy X3134 A, 2x80 Track solange Vorrat... -..»- nur 638,- 

SONY 3%" Laufwerk 2:22:02 2.2.2, nur 799,- 

Apple*-kompatibles Laufwerk incl. Gehäuse + Kabel csseeeeenn een 599,- 
EPSON DRUCKER 

EPSONFXBO ....::::44:. .» WTO,- EPSONFXI0O ......2:2.....- 2159,- 

EPSONRXBO un 1079,- EPSONRXBOFT ..........4- 1295,- 





Patch-Diskette für SONY 3%" Laufwerke — ermöglicht die Anpassung an I/lleund 
kompatible Computer . . 80,- Manual vorab 15,-DM (wird beim Kauf 
der Patch- Diskette angerechnet). dito, für 5Y4" Laufwerke .....--- 69,- 
Disketten Böb&Böd SS/DD 1051. 62,- 10 Disketten 1.Sony 312" Laufw. . 150,- 
Akustikkoppler AK 300 mil FTZ-Nr. incl. Netzteil 


Die Microfloppy mit Zukunft: 


Speicherkapazität: 2 x 1 MByte for- 
matiert: 2x 640 kByte, Anschlußfertig 
mit PROÜM-residenter Patchsoftware $ 
für GP/M 2.2, Apple DOS 3.3, Diversi- 
DOS 2-G, 4-G (DD:.MOVER), Apple 
Pascal 1.1, Pascal 1.2, Pro-DOS 
1.0,1, 1.1, 1.1.1. zum 7, 

PIaisvon.o=sesre + 1640 e 


Low Power Version . 


10MBWinchester  4490,- 








Gesamt:Pralalishe ano Preise incl, ges. Mwst. 


Ueding electronics 


DFÜ 02373/66877 
Tel. 02373/63159 


Holtewiese 2 
5750 Menden 1 
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;: GOTO 715® 


IF C6$ > < "J" THEN PRINT CHR$ (7) 
POKE 32,1: POKE 33,38 
9:UL = 1:V® = NL:OL = 24: GOSUB 94ß0:NL = V6 


1:VÖ 
Ä Rn) SL:QOL 
:UL = 1:V@ = IN:OL 
: HTAB 38: PRINT "+#!; 
: HTAB 7: INPUT V4$ 
(va$): IF L > 38 THEN PRINT CHR$ (7);: 
GOTO 7966 
IF L= ß THEN 7296 
L = ASC ( LEFT$ (V4$,1)): IFL< 65 OR L > 99 THEN 
PRINT CHR$ (7);: GOTO 7008 


NC:OL = 48: GOSUB 9499:NC = V® 
63999: GOSUB 94B9:SL = VB 
635998: GOSUB 94BB:IN = VB 


T:OL = 6: GOSUB 94ß98:ST = V® 
4: GOSUB 94ß0:DR = VB 


: REM -—-Menü 2-—— 
INVERSE : PRINT SPC(39);: GOSUB 91ß89: 
PRINT SPC(11)}: 
INVERSE : PRINT '"MENUE-GENERATOR"; 
GOSUB 9189: PRINT " File-Name:"; 
GOSUB 91ß®: HTAB 4: PRINT FI$;",S":ST;",D";DR; 
GOSUB 3919: PRINT " Zeilennumnern: ";SL;" bis "; 
LN - IN;: GOSUB 929% 


GOSUB 92ß9: PRINT " Inkrement ; #4: INVERSE : 
PRINT IN;: GOSUB 9199 

INVERSE : PRINT SPC(39);: NORMAL 

VTAB 11: HTAB 34: GET Cß$: PRINT C9$; 

IF Cö$ = "N" THEN VTAB 29: RETURN 

IF C6$ > < "J" THEN PRINT CHR$ (7);: GOTO 8128 

POKE 33,39 

VT = 14:UL = 1:Vß = SL:0OL = 63999: GOSUB 9499:SL 

VT = 15:UL = 1:Vd = IN:OL = 63998: GOSUB 94QB: IN 

POP : GOTO 3810 

REM ---Subroutinen-——. 
NORMAL : PRINT TAB(4ß); 
NORMAL : PRINT SPC(38); 
NORMAL : RETURN 

NORMAL : PRINT TAB(4ß); 
NORMAL : RETURN 

XX = OF(DA): IF DA = 1 AND ASC (C$) < = 64 THEN XX 
AS = ASC (C$) + XX: RETURN 

VTAB VT: HTAB 38: INPUT V$: IF V$ = "" THEN RETURN 
vl = VAL (V$): IE VI < UL OR Vl > OL THEN 

PRINT CHR$ (7);: GOTO 9499 

VÖ = Vl: RETURN 

PRINT :D$ = CHR$ (4) 

PRINT D$; "OPEN" ;FI$;",S";ST;",D";DR 

PRINT D$; "UNLOCK";FI$ 


: INVERSE : PRINT 
©sINVERSE : SPRINT 


: INVERSE : PRINT " 


IF LN — IN > 63999 THEN NORMAL : 
FLASH : PRINT "NICHT ZULAESSIG"; 


GOSUB 92ß8: PRINT " Generierung wiederholen(J/N)? "; 
l.Zeilennummer :"; 


GOSUB 9209: GOSUB 9199: PRINT " 
INVERSE : PRINT SL; 


MMU 2.0 

Memory Managements 
Utilities 

für die Apple lle 64K-Karte 

DOS 3.3 (und ProDOS) 


von U, Stiehl 


1984, Diskette und Manual, DM 93,— 
ISBN 3-7787-1023-1 


Insgesamt enthält die neue „MMU 2.0"- 
Diskette über 25 Programme, die neue 
Einsatzmöglichkeiten für die Extended 80 
Column Card (erweiterte 80-Z-Karte = 
64K-Karte für den Apple Ile) erschließen. 
Ein Teil der Programme laufen auch auf 
dem Apple II Plus, doch ist „MMU 2.0° 
primär für 64K-Karte-Besitzer gedacht. 


Gerätevoraussetzung: Apple Ile mit 64K- 
Karte oder IIc 


Hüthig Software Service, 
Postfach 10 28 69, D-6900 Heidelberg 


PRINT TAB{19):;: 


PRINT D$; 
PRINT D$:; 
PRINT D$; 
RETURN 


Softbreaker 1.0 


Eine softwaremäßige Interrupt-Utility 
für die Apple Ile 64K-Karte 


von U. Stiehl 


1984, Diskette und Manual, DM 48,- 
ISBN 3-7785-1022-3 


Softbreaker ist ein Assemblerprogramm, mit 
dessen Hilfe Programme, die sich von der 
64K-Karte (= Extended 80 Column Card für 
den Apple Ile) starten lassen, unterbrochen, 
gespeichert, geladen und exakt an der Stelle 
der Unterbrechung fortgeführt werden kön- 
nen. Dadurch ist es auch möglich, Siche- 
rungskopien von sogenannten kopierge- 
schützten Programmen herzustellen. 

Mit Softbreaker unterbrochene Programme 
werden komplett, d. h. die ganzen 64K ein- 
schließlich Language Card, in nur ca. 11 Se- 
kunden auf einer formatierten Diskette gesi- 
chert. 

Gerätevoraussetzung: Apple Ile mit 64K- 
Karte 


Hüthig Software Service, 
Postfach 10 28 69, D-6900 Heidelberg 





"DELETE"; FI$ 
"OPEN"; FI$ 
"WRITE"; FI$ 





INPUT 2.0 


Ein Bildschirm- 
Maskengenerator 

für DOS 3.3 und ProDOS 
von U. Stiehl 


1984, Diskette und Manual, DM 98,— 
ISBN 3-7785-1021-5 


„Input 2.0" liegt wahlweise in der Bank 1 
oder Bank 2 der Language Card und wird 
durch einen kurzen Driver in den unteren 
48K aufgerufen. 

Für jedes Feld der Bildschirmmaske lassen 
sich u.a. definieren: Feldlänge (bis zu 255 
Zeichen) — Vitab — Htab — Datentyp (insge- 
samt 8 Typen) — Scrollflag (starre oder dyna- 
mische Maske) — Otrlflag — Füllflag — Lösch- 
flag — Bildschirmflag (40- oder 80-Z-Darstel- 
lung). Innerhalb eines Eingabefeldes besteht 
jeder denkbare Redigierkomfort (Insert, De- 
lete, Rubout, Restore usw.). 
Gerätevoraussetzung: Apple lie oder IIc; fer- 
ner Apple II+ im 40-Zeichenmodus 


Hüthig Software Service, 
Posifach 10 28 69, D-6900 Heidelberg 
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Peeker-Sammeldisketten 


Peeker 
Sammeidiskette 
Heft 1 und 2, 1984 





Einzelbezug DM 28,— 
Fortseizungsbezug DM 20,— 

(Jederzeit kündbar,. jedoch mindestens 
6 Disketten) 

(* = nur auf Diskette, nicht im Peeker 
gelistet! Seitenangaben beziehen sich 
auf Beginn des Listings) 

Hüthig Software Service 

Postfach 102869 » 6900 Heidelberg 1 


Disk# 1 
(Heft 1+2, 1984) 


T.DISASSEMBLER.65C02 (1/84, S. 15) 
DISASSEMBLER.65002 


T,ACCEL,WAIT (1/84, 5. 22) 
ACCEL.WAIT 
T.ACCEL.BOOT 
ACCEL.BOOT 
ACCGEL.LC,KOPIERER 
T.ACCEL.LO.KOPIE 
ACCEL.LC,.KOPIE 
T.ACCEL.ROM.KOPIE1 
ACCGEL.ROM.KOPIE1 
T,ACGEL.ROM.KOPIE2 
ACCGEL.ROM.KOPIE2 


TURTLE.GRAFIK.MIT.REMS (1/84, S.29) 
TURTLE,GRAFIK.OHNE.REMS * 


DOUBLE.LORES,SOFTSWITCH.DEMO 
(1/84, S. 37) 
DOUBLE,LORES.APPLESOFT.DEMO 
AMPER.DOUBLE.LORES,DEMO 
T.AMPER.DOUBLE,LORES 
AMPER.DOUBLE.LORES 
T.DOUBLE.LORES 

DOUBLE,LORES 


HIRES (1/84, S..41) 
T.PRINTHIRES 
PRINTHIRES 


DHGR.APSOFT.DEMO (2/84, S. 30) 
AMPER.DOUBLE.HIRES.BAS 
AMPER.DOUBLE.HIRES 
T.AMPER,DOUBLE.HIRES 
DHGR.LINEPLOTTER 
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INSTRING.TEST (2/84, S. 43) 
INSTRING.OBJ 
T.INSTRING.OBJ 
INSTRING.LISA,SOURGE 


LOESCHEN.EINES,ARRAYS 
(2/84, S. 52) 


ULTRATERM,ENGLISCH * (2/84, S.. 60) 
ULTRATERM,DEUTSCH * 


PRIMZAHLEN.OVERMEYER * 
(2/84, 5, 70) 

PRIM.OBUO * 

PRIM.OBJ1 * 

PRIM.TEST * 
PRIM.TOOLKIT.SOURCE * 


Disk #2 
(Heft 1-2, 1985, DOS-Format) 


T.RAMDISKLC (1-2/85, S. 14) 
RAMDISKLC 


T.IBS,RAMDISKDRIVER (1-2/85, S. 20) 
IBS.RAMDISKDRIVER 
T.AP20.RAMDISKTEST 
AP20,RAMDISKTEST 


T.QUICKCOPY (1-2/85, S. 26) 
QUIEKCOPY 
QUICKCGOPY.PUFFER 
PRODOS,COPYA 
T.PRODOS.COPYOBJ * 
PRODOS.COPYOBJ 


Peeker 
Sammeldiskette 
Heft 1 und 2, 1985 
DOS 3,3 
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PRODOS,PATCH (1-2/85, S. 31) 


T.APPEESOFT;ERE (1-2/85, 5: 36) 
TulzEHt 

EGSFRE 

PRE.IEST 

T.RAM,FRE * 

RAM.FRE 


T.SCHIRMDISK (1-2/85, S. 44) 
SCHIRMDISK.LISA.SOURCGE 
SCHIRMDISK 


T.VIDEXT XPLOT.DEMO (4/85, S, 18) 
VIDEXT.LISA.SOURCE XPLOT.ROUTINE 
VIDEXT TXPLOT;ROUTINE 


MENUE.GENERATOR (4/85, S. 22) | 


GETPAS (1-2/85, S. 70) 
T.GETPAS.ASS * 

GETPAS.ASS 
GETDOS.PASCAL.SOURCE 
COPYDUPDIR.PASCAL.SOURGE 


T.MACROS.65C02 (4/85, S. 31) 


TERMINAL (4/85, S,36) 
TERMINAL.B 
T.TERMINAL.B 


PRODOS.EDITOR,MACROS 
(1-2/85, 5,86) 


CAT.ARRAY (4/85, S. 44) 
CAT.SAVER 
EINTRAG.SUCHER 
EINTRAG.ANALYSE 
PRODOS.READER 
T,PRODOS,.READER,OBJ 
PRODOS.READER,OBJ 
Disk #3 

(Heft 1-2, 1985, CP/M-Format) MOUSESTUFF,PASCAL.SOURCE 
(4/85, 5, 51) 


STEUER,84 (1-2/85, S. 47) MOUSE,ASS.PASCAL,SOURCE 


PASS.BAS TESTMOUSE.PASCAL.SOURCE 
MENUE.BAS DRAWMOUSE.PASCAL.SOURCE 
HELP.BAS * 

A.BAS INALL.DATA (4/85, S. 70) 


B.BAS SCREEN80.DATA (4/85, S. 33) 
C.BAS SCREEN80.SAVER (4/85, S. 76) 
D.BAS 

E.BAS 

F,BAS 

G.BAS 

H.BAS 

I.BAS 

J.BAS 

K.BAS 

L,BAS 

M.BAS 

N.BAS 


Disk #4 
(Heft 3-4, 1985) 


TESTGENERATOR (3/85, S. 26) 
SAETZE 

BAHNFÄHRT * 

ZU 

TUN.UND.SOLLEN * 

IRGEND * 


MULTIPRECISION (3/85, 5. 32) 


T.WS.TRANSFER (3/85, S. 36) 
WS.TRANSFER 
T.WS.TRANSFER.2 * 
WS.TRANSFER.2 * 

GETCPM 


PRIM.O.SC.SOURCE (3/85, S. 62) 
PRIM.O.BIN 

PRIM.1.SC.SOURCE 

PRIM.1.BIN | 
PRIM.FP | 


ACCGELERATOR,ABSTELLEN 
(3/85, S. 66) 


T.WILDCARD.TEST * (3/85, S. 72) 
WILDCARD.TESTT * 
T,WILDCARD,TEST2 * 
WILDCARD.TEST2 * 
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Verkauf Software 


* x Finanzbuchhaltung x x 
für Apple II mit CP/M. Program- 
mierbüro Kurt Kastner, Niko- 
lausstr. 3, 7500 Karlsruhe 


Astrologieprogramme. Info n. 
Voreinsendung 1 DM in Briefmar- 
ken. C. Landscheidt, Im Dorfe 14, 
2804 Lilienthal. 


Profess. Daten-, Text-, Grafikverar- 
beitung, universell einsetzbar, DOS 
3.3 Disc: 159 DM, Info gratis, Demo- 
disc und Gesamtangebot: 10 DM G. 
Basse, Vahlenhorst 9, 29 Oldenburg 


Profi-Rechnungsprogramm (99 
Pos.) DM 89,-. Info: Florian Kopitzki, 
Ameisenberagstr. 57 c, 7000 Stuttgart 1 


APPLE Il-Programmgenerator für 
Eingabemasken bzw. Felder 59,— 
Dateiverwaltung m. Editor, Grafik- 
Listenpaket 65,-, Bstllg. gg. Vor- 
kasse, Info -,80: Fahrenberger, 
Rittershausstr. 4, 5300 Bonn 1 





PEE 


Für Ihre Kinder/Schüler (8-12 J.)! 
Disk. über Grundrechnungsarten. 
Praxiserprobt! DM 59,-. Lehrer 
G. Eiler, Hof 16, A-6951 Lingenau 


Ankauf Software 


GraForth Animation Guide, Trans- 
Forth ges., Chiffre P 1000 


Suche Paich/Treiber für Profile 
(Apple-Fesiplate) unter CP/M 
Chiffre P 1001 


Verkauf Hardware 


Zu wenig SLOTS? Slot Expander 
liefert 8 weitere Slots, per Software 
umschaltbar, Platinenset (2), durch- 
kontaktiert, incl. Beschreibung: 
DM 180,-, Info: E. Tausendpfund, 
Gonsenheimer Spieß 18, 65 Mainz. 


Sprachausgabe-Interface x*x* Info: 
Zotter, Triberg 15, 7030 Böblingen 


Erscheinungs- und Anzeigen- 
schlußtermine für peeker 


Ausgabe 


22. 4.85 


Erscheinungs- 


Anzeigen- 


termin schluß 


22. 3.85 


20. 5.85 . 4.85 


24. 6.85 . 9.85 


22. 7.85 . 6.85 


26. 8.85 . 1.85 


23. 9.85 . 8.85 


21. 10. 85 . 9.85 


29.21.1..89 . 10. 85 
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EDV-ZUBEHÖR, Akust. Koppler m. 
FTZ 298,-, Markendisk. ab 4,40, 
Papier, Etiketten, Farbb., Preisl. a. 
Anfr. W. Kotschenreuther, Gqg.- 
Buchner-Str. 29, 85 Nürnberg 10, 
Tel. 0911-516739 


IBM-Gehäuse für Apple DM 180,— 
Controller (1x35 -2x80) DM 200,— 
beides neuw., Tel. 08191/5817 ab 18h 


Verkaufe: 2 BASF Floppys 6106 
im AKA Doppelgehäuse DM 600;-; 
Tel. 0551/91363 


Verkaufe APPLE-Kompa. mit Zu- 
behör, Preis VB, Tel. 02384/3909 
nach 19.00 Uhr 


68000-KARTE IBSAPZO mitASM- 
SW.990,-DM, Klaus Schmidt, Dör- 
nerhof, 4100 Duisburg 1, (02.03) 
341729 


Farbgraphik-Interface für NEC 
8023 bzw. Itoh 8510 SCP nur 250, — 
DM, Tel.0 2422/7420 





ker 999994 


APPLE Il comp. mit 64k 6502 und 
Z80 CPU im IBM Gehäuse und se- 
parater Tastatur nur DM 1398,- 
noch heute Liste anfordern über 
weitere Hardware bei 

B. Kraus, Rohrersmühlstr. 21, 
8540 Schwabach 


* * * Apple Il Supermodem x x x 
alle Standarts, auch BTX, komplett 
auf einer Karte, mit Supersoftware 
superbillig bei 

Rolf Kiupel, Tei. 0431/5554 27 


Disketten, 51/4”, ssldd, 10 Stück 
37,- DM, Tel. 0911/460681 


Ankauf Hardware 


Suche Patch/Treiber für Profile 
(Apple-Festplatte) unter CP/M 
Chiffre P 1001 


SUCHE Il e/c/+ oder MAC und 
Drucker und Software (auch ein- 
zein), Tel. 0421/7017 71 


Inserentenverzeichnis peeker 4/85 


beam-verlag, Marburg/Lahn . 


E. Böhmer, DRV, Dreieich 


CCP Datentechnik, Hamburg 


copy team gmbh, erlangen 
erphi electronic, Baldham 
hib, Nürnberg . 


Hoffmann Computertechnik, 


Interkom, Isernhagen 
Intus, Waldshut-Tiengen 


McGraw-Hill-Book, Hamburg 


E.-W. Meyer, Frohnhausen 
Micromint, Erkrath 
pandabooks, Berlin . 
pandasoft, Berlin 

Softline, Oberkirch 

te-wi Verlag, München 


Ueding electronics, Menden . 





Seite 
76 

9 

23 
17 


Kiel 


Peeker 4/85 


Für Ihre Unterlagen 
Abonnement bestellt 


am. 


Vertrauensgarantle: 


Ich habe davon Kenntnis genommen, 
daß ich die Bestellung schriftlich durch 
Mitteilung an den Verlag innerhalb von 
7 Tagen widerrufen kann. Zur Frist- 
wahrung genügt die rechtzeitige Ab- 


sendung des Widerrufs. 


peeker 
Leserservice 


Postfach 102869 
6900 Heidelberg 1 


Für Ihre Unterlagen 
Folgende Bücher bestellt: 


am: 
bei: 


peeker 
Versandbuchhandlung 


Postfach 102869 
6900 Heidelberg 1 


Für Ihre Unterlagen 


Folgende Disketten 
und Programme bestellt: 


am: 
bei: 

peeker 
Softwareabteilung 
Postfach 102869 
6900 Heidelberg 1 





rc Abo-Karfte 









wa Buch -Shop 








a Software -Karte 





IIIIIAP 


9992 


aaaaad) 


EEKER 44 


MAGAZIN FÜR APPLE-COMPUTER 





Ja, ich möchte »peeker« abonnieren. 


Liefern Sie mir »peeker« ab der nächsten Ausgabe zum Einführungspreis von 
nur DM 58,-—. 1985 erscheinen 11 Ausgaben (1 Doppelheft). Ich spare dabei 
gegenüber dem Einzelkauf genau DM 13,50. Es entstehen mir keine weiteren 
Kosten. Die Lieferung erfolgt frei Haus. Porto, Verpackung und Zustellgebühren 
übernimmt der Verlag. Der Einführungspreis für das Ausland beträgt DM 58,- 
zuzüglich Versandspesen. 


Ich wünsche jährliche Berechnung 
UL} durch Verlagsrechnung oder L[] Abbuchung von meinem Bank- bzw. 


Postscheckkonto 
Bank/PschA 
Bankleitzahl Kto.-N.. 
DeLUM Unterschrift 
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MAGAZIN FÜR APPLE-COMPUTER 





Bitte senden Sie mir gegen Rechnung folgende Bücher: 


.l Apple Assembler, DM 34,- 

UL) Apple II Basic Handbuch, DM 32,- 

L] Apple DOS 3.3, DM 28,- 

UL] Apple Il leicht gemacht, DM 28,- 

[] Apple Maschinensprache, DM 49,- 

L_] Apple ProDOS, Band 1, DM 28,- 

[| Arbeiten mit dem Macintosh, DM 54,- 

U] BASIC-Übungen für den Apple, DM 38,- 


Datum Unterschrift 
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MAGAZIN FÜR APPLE-COMPUTER 





Bitte senden Sie mir 
gegen Rechnung folgende Apple-Programme: 


[] Peeker-Sammeldiskette, Heft 1-2, U Apple DOS 3.3, Begleitdiskette, DM 28,- 


1984, DM 28,— OD] Apple ProDOS, Band 1, Begleitdiskette, 
[1] Peeker-Sammeldiskette, Heft 1-2, DM 28,- 
1985, DM 28,- 7] Apple Assembler, Begleitdiskette, DM 28,— 
[] Peeker-Sammeidiskette, Heft 1-2, 5 ee 2 nn an 
1985, Steuererklärung 1984, CP/M, . 2.oglalnll) = 
DM 28,- [I INPUT 2.0, Programm, DM 98,- 
[I Softbreaker 1.0, Programm, DM 48,— 
[I DB-Meister, Programm, DM 290,— 
L] Superplot, Programm, DM 48,— 
Datum Unterschrift 





Straße 


PLZ/Ort 

Vertrauensgarantie: 

Ich habe davon Kenntnis genommen, daß ich die Bestellung 
schriftlich durch Mitteilung an den Verlag innerhalb von 

7 Tagen widerrufen kann. Zur Fristwahrung genügt die 
rechtzeitige Absendung des Widerrufs. 


Datum 


Unterschrift 


Verlagshinweis: 

Das Abonnement verlängert sich zu den jeweils gültigen 
Bedingungen um ein Jahr, wenn es nicht 2 Monate vor 
Jahresende schriftlich gekündigt wird. 





PRTIER 








rd Buch-Sho 


; 
5 


Q)_“" bitte vollständig ausfüllen 


Vorname, Name 


3 


Straße 


PLZ/Ort 


Tetefon mit Vorwahl 





Karte bitte vollständig ausfüllen 


Vorname, Name 


Firma 


Straße 


PLZ/Ort 


Telefon mit Vorwahl 


POSTKARTE 


peeker 
Leserservice 


Postfach 10 28 69 
6900 Heidelberg 1 


POSTKARTE 


peeker 
Versandbuchhandlung 


Postfach 10 28 69 


6900 Heidelberg 1 


POSTKARTE 


peeker 
Softwareabteilung 


Postfach 10 2869 


6900 Heidelberg 1 





Die Fachzeitschrift, 
die umfassend aus allen Teilbereichen 
des CAE berichtet 


[ikjellalı Biralıe 






CAE-Journal für Leser, die ständig 
informiert sein müssen über: 


@ neue Entwicklungen und Trends 
@ neue Technologien | 
© neue Methoden und Verfahren ' 

@ neue Applikationen k 













JOURNAL 


® Wirtschaftliches und Aktuelles ERREEIFERE a Compulen Alded Engineering 
aus allen Bereichen des 
» Gate Arav-Entwurf ui 
Computereinsatzes in der AG Ra En 
Technik er Fe mess | 
£ in pB2 Ya] u | { HL! li neh La 
PR Laden hör Computer RR: au nakaschlle 
e Gate Array-Entwur 
EI ER ete All er 
u 
CH N lee 
Ren, 
KK . . Uereee 1 nl 
Huthig 


PUBLIKATION 









= % 7 u 4 l 
en bei 2 u .. hl 
i Ft ae A ı Si a Ma ah ” 
on ar En nz i A Den 1 de 
Bi En nun a u . “| 
a |: K- Sa euncna z E Le m An 


Coupon 








Ja,ich möchte CAE-Journal kennenlernen und prüfen. Sie schicken mir die 
neueste Ausgabe kostenlos zu. Wenn ich 20 Tage nach Erhalt meines Probe- 
Sie von unserem nebenstehen- heftes nichts von mir hören lasse, liefern Sie bitte die Zeitschrift bis auf 

den Kennenlern-Angebot Ge- Widerruf im Abonnement zum Jahresbezugspreis von DM 60,- inkl. Mwst.,, 


Sie möchten das CAE-Journal | 
brauch | zzgl. Versandspesen für 6 Ausgaben 1985. Kündigungen sind bis 8 Wochen 


kennenlernen? Dann machen 


vor Jahresende schriftlich an den Verlag zu richten 
| 


Name, Vorname 








Firma 
Abllg. 
Straße 
Coupon ausgefüllt 
einsenden an: 
Datum Unterschrift 


CAE-Journal, Leserservice 
Postfach 10 28 69 
D-6900 Heidelberg 1 


Wichtig: Wenn ich CAE-Journal nicht regelmäßig lesen möchte, schicke ich innerhalb von 20 Tagen 
eine kurze Mitteilung an den Verlag und alles ist für mich erledigt 
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Datum | Unterschrift 


| 

| 

| 

| | 
| PLZ/Ort 

| 

| 

| 

| 









von Dipl.-Oec. Edgar Meyzis 


Nachfolgend wird beschrieben, wie Ma- 
krobefehle für Assembler des Typs 
MERLIN und BIG MAC entwickelt wer- 
den können. Im „Peeker“, Heft 1/1984 
wurden die zusätzlichen Befehle der 
CPU 65C02 und ein entsprechender 
Disassembler vorgestellt. Die Darstel- 
lung knüpft daran an und bietet eine 
Möglichkeit, den erweiterten Befehls- 
satz der CPU mit Hilfe von Macros kom- 
fortabel zu nutzen. Inzwischen gibt es 
einige Assembler, die die neuen 65C02- 
Opcodes automatisch unterstützen, 
und zwar „Merlin.Pro“ (z.Zt. noch nicht 
in Deutschland erhältlich) oder „SC- 
Macroassembler“ (über Fa. Karl-Heinz 
Weiß, 2940 Wilhelmshaven, Am Wie- 
senhof 17, erhältlich). Da sich jedoch 
nicht jeder wegen der neuen Opcodes 
einen neuen Assembler kaufen will, 
sind die nachfolgenden Macrobefehle 
eine nützliche Ergänzung. 
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Makros für die neuen 
Befehle des 65C02 


1. Struktur von Makrobefehlen 


Bevor auf die Makrobefehle für den 65C02 
eingegangen wird, ist es zweckmäßig, sich 
kurz mit ihrer Grundstruktur und der Im- 
plementierung auseinanderzusetzen. Die 
erste und die letzte Zeile eines Makrobe- 
fehls ist an folgende Form gebunden: 


LABEL MAC 
EOM bzw. <<< 


Die erste Zeile enthält den Namen (LA- 
BEL) des Befehls und den Hinweis (MAC), 
daß die Definition eines Makros folgt. Mit 
„EOM“ (End of Macro) bzw. „<<< Ist 
eine Definition abzuschließen. Makrobe- 
fehle werden in einem Assemblerpro- 
gramm wie folgt aufgerufen: 


PMC LABEL bzw. >>> LABEL 


Der Aufruf wird durch den Assembler an 
der Buchstabenfolge „PMC“ (Put Macro) 
bzw. an den drei Rechtspfeilen (Größer- 
Zeichen) erkannt. Als LABEL können des- 
halb durchaus Zeichenfolgen verwendet 
werden, die — allein eingesetzt — für den 
Assembler eine spezifische Bedeutung 
haben (z.B. Mnemonics für Operation 
Codes). Sind bei Aufruf eines Makrobe- 
fehis Parameter zu übergeben, so Ist dem 
LABEL eine Parameterliste anzufügen: 


>>> LABEL.Parameter;...;‚Parameter 


Es können bis zu acht Parameter überge- 
ben werden. Mit ihrer Spezifizierung wird 
zugleich eine entsprechende Anzahl loka- 
ler Variablen deklariert. Sie nehmen die 
Werte der übergebenen Parameter in der 
Reihenfolge ihrer Nennung an. Die Be- 
zeichnungen der Variablen sind vorge- 
geben: 


11...]8 _ Amerikanischer Zeichensatz 
U1......U8 Deutscher Zeichensatz 








Die Parameter, die in die Variablen einge- 
hen, müssen vor Aufruf der jeweiligen Ma- 
krobefehle definiert sein, um uneinge- 
schränkt korrekte Ergebnisse zu erhalten. 
Deshalb ist es im allgemeinen unzweck- 
mäßig, in der Parameterliste LABELS auf- 
zuführen, die erst später im Programm 
folgen. Es besteht jedoch eine wichtige 
Ausnahme: Standardanweisungen an den 
Assembler für die Erzeugung von Objekt- 
code (z.B. LDA LABEL) werden auch dann 
stets genau ausgeführt, wenn das LABEL 
sich auf eine spätere Stelle im Programm 
bezieht. Von dieser Möglichkeit wurde bei 
der Erarbeitung der Makrobefehle für den 
65C02 mehrfach Gebrauch gemacht. 

Bei der Definition von Makrobefehlen ist 
es häufig erforderlich, die folgende Kon- 
trollstruktur einzusetzen, um eine kondi- 
tionale Assemblierung zu erreichen: 


DO Ausdruck 
ELSE 
FIN 


Nimmt der Ausdruck einen Wert ungleich 
null an, so wird der von DO und ELSE 
eingeschlossene Programmteil ausge- 
führt. Ist hingegen der Ausdruck nuil, so 
werden die Instruktionen zwischen ELSE 
und FIN abgearbeitet. 

Den allgemeinen Teil abschließend bleibt 
noch zu erwähnen, daß Makrobefehle den 
Anfang eines Quellprogramms bilden 
müssen. Sie sind in ihrer Gesamtheit von 
„DO 0“ und „FIN“ einzuschließen, um zu 
vermeiden, daß für sie bei der Assemblie- 
rung Objektcode erzeugt wird. 


2. Anforderungen an 65C02-Macro- 
befehle 


Wir können uns nun der konkreten Aufga- 
benstellung zuwenden, d.h. der Definition 
von Makrobefehlen, die die Operation 
Codes für den erweiterten Befehlssatz des 
65C02 erzeugen. An die zu erarbeitenden 
Makros sind folgende Anforderungen zu 
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stellen: 

— als LABEL möglichst standardisierte 
Mnemonics verwenden 

— übergebene Parameter formal auf Rich- 
tigkeit prüfen 

— ggf. Fehlermeldungen generieren und 
Assemblierung abbrechen 

— Bezugnahme auf folgende Programm- 
teile unter Angabe von LABEL ermögli- 
chen. 


Die Forderungen werden von den vorlie- 
genden Makrobefehlen erfüllt. Dazu ist es 
teilweise erforderlich, Fehler zu simulie- 
ren, um Meldungen zu erzeugen, die die 
tatsächliche Situation richtig beschreiben. 


3. Die Makrobefehle für den 65C02 


Das beigefügte Listing enthält die Makro- 
befehle in alphabetischer Reihenfolge. Der 
Definition der Befehle liegen fünf Muster 
zugrunde, die sich hauptsächlich durch 
ihren Grad an Komplexität unterscheiden. 
Je ein Befehl aus den sich so bildenden 
fünf Gruppen wurde exemplarisch aus- 
führlich kommentiert, um das Vorgehen zu 
verdeutlichen. Bei Einarbeitung in die Auf- 
gabenstellung wäre es von Vorteil, mit der 
Analyse der einfachsten Befehle zu begin- 
nen und den Beispielen zu folgen. 


Beispiel 1: DECREMENT 
ACCUMULATOR 

Es bietet sich an, z.B. die Definition des 
Makrobefehls „DEA” zu betrachten: Das 
Makro fügt in den Objektcode lediglich das 
Byte „3A, den Operation Code für 
„DEA“ ein. Dazu werden keine Variablen 
benötigt; die Parameterliste bleibt somit 
leer. 


Beispiel 2: BRANCH ALWAYS 

Als typisches Beispiel für das nächste Mu- 
ster dient der Befehl „BRA“, der wie folgt 
aufzurufen ist: 


>>> BRA.ADDR bzw. >>> BRA.LABEL 


Als Parameter ist die Adresse durch ihren 
Zahlenwert oder symbolisch anzugeben 
(z.B. $8050 oder ZIEL). Zunächst wird ein 
bedingter Sprung zu der Adresse simu- 
liert, die die Variable „]1“ enthält. Dabei 
wird die maximal mögliche Sprungdistanz 
beachtet. Falls erforderlich, wird eine ent- 
sprechende Fehlermeldung erzeugt. 
Durch Simulation eines bedingten Sprun- 
ges ist es möglich, zu Programmteilen zu 
verzweigen, die erst später folgen. 


Beispiel 3: ADD WITH CARRY INDIRECT 
Das dritte Muster wird durch den Befehl 
„>>> ADCI.ZP-ADDR” repräsentiert. 
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Als Parameter ist eine Adresse auf der 
Zero-Page zu übergeben. Durch die In- 
struktion „ADC (]1,X)* wird die Einhaltung 
dieser Bedingung geprüft und zugleich die 
Adresse im Objektcode gesetzt. Es ist an- 
schließend nur noch erforderlich, den 
Operation Code für die indirekte Addition 
einzusetzen. Der Makrobefehl weicht von 
dem standardisierten Mnemonic ab, um 
das Lesen des Quellprogramms zu er- 
leichtern. 


Beispiel 4: STORE ZERO WITH INDEX 
Das vierte Grundmuster ist in dem Befehl 
„>>> STZXADDR" zu erkennen. Vor 
der Generierung von Objektcode wird mit 
der Variablen „JANFG“ die aktuelle Adres- 
se des Programmzeigers festgehalten. 
Anschließend wird ein Speicherzugriff 
(STA ]1,%) simuliert und die Länge des 
Codes (BYTES) festgestellt. Je nach 
Adresse kann es sich nur um einen Zwei- 
byte- oder um einen Dreibytebefehl han- 
deln. Dieser Sachverhalt bestimmt die fol- 
gende bedingte Assemblierung. Ergibt der 
Ausdruck „JBYTES-2“ den Wert null, so 
handelt es sich um einen Zweibytebefehl; 
somit ist der Operation Code „74“ zu set- 
zen. Liegt hingegen die übergebene 
Adresse nicht auf der Zero-Page, so ist der 
Code „IE“ einzufügen. 


Beispiel 5: BRANCH ON BIT RESET 

Der Befehl „>>> BBR.0-7;ZP-ADDR; 
ZIEL" spiegelt das fünfte und letzte Mu- 
ster wider. Der erste Parameter darf nur im 
Wertebereich von O bis 7 liegen. Dies wird 
durch Auswertung des Ausdrucks 
„II&FFF8" geprüft, indem die Variable 
„|1“ durch die logische Operation „AND“ 
mit der Konstanten „$FFF8" verknüpft 
wird, Liegt der Wert der Variablen außerhalb 
der angegebenen Grenzen, so wird eine 
Fehlermeldung generiert. Aus dem ersten 
Parameter ist der Operation Code entspre- 
chend des zu testenden Bits zu gewinnen. 
Dazu wird das untere Halbbyte in das obe- 
re durch eine Multiplikation mit 16 (= $10) 
„geschoben“; anschließend wird das un- 
tere Halbbyte durch die logische Opera- 
tion „OR“ (.) mit „$F" gefüllt (BBR1 EQU 
11%*$10.$0F). 


Es soll nicht unerwähnt bleiben, daß die 
Anwendung der Makrobefehle auch einen 
kleinen Haken hat. Die Übersichtlichkeit 
der Assemblerlistings leidet darunter, daß 
vorläufige Operation Codes gesetzt und 
anschließend substituiert werden. Der Zu- 
gewinn an Komfort bei der Programmie- 
rung gleicht diesen Mangel jedoch aus. 
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MACROS zur Unterstützung * 
der neuen Befehle des 650ß2 * 
von Edgar Meyzis, Nov. 1984 “ 
{für Big Mac bzw. Merlin) * | 
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Dt 6 
ADC INDIRECT OP CODE 72 


Syntax: >>> ADCI.ZP-ADDR 0. 
>>> ADCI, ZP-LABEL 


& 
ADCI MAC 


* 
* 


ADDR u. vorläufigen OP CODE setzen; 


x Fehlermeldung, wenn ADDR n, auf ZP 


* ok ka Hr »* 


*KErUKKKR KH 


*kx* %* 


* 


ADC (BL,X) 

Zeiger f, Code zurück auf ADC-Byte 
DS -2 

vorläufigen OP CODE ersetzen 
HEX 72 ;‚ ADC IND 


Zeiger vorsetzen, hinter ADDR 


DS l 
is 
AND INDIRECT UP CODE 32 


Syntax! >>> ANDI.ZP-ADDR 0. 
>>> ANDI.ZP-LABEL 


DI MAC 


AND (b1,xX) 
Ds -2 
HEX 32 

Ds ı 

<<< 


; AND IND 


BBR [#(@-7)] OP CODES BF-TF 


Syntax: >>> BBR.®-7; ZP-ADDR ; ADDR 
>>> BBR.®-7;ZP-LÄBEL; LABEL 


R MAC 
Byte für OP CODE reservieren 
DS 1 


Sprungdistanz prüfen und setzen, 
ggf. BAD BRANCH melden 


BNE 03 

Zeiger zurück auf Byte f. OP CODE 
DS -3 

Ist der erste Operand kleiner 8 ? 
DO ÜI&$FFFE 

nein, somit BAD OPERAND simulieren 


JMP $#® 
ELSE 


k liegt ADDR auf der ZPG? Ggf. Fehler 





melden; falls o.k.,, ADDR setzen 
LDA {U2,X) 

Zeiger auf Byte für OP CODE setzen 
DS = 


OP CODE berechnen; dazu unteres 
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* Halbbyte i. d. obere schieben und 








| 175 % * Syntax: >>> PHX 
x anschl. unt. Halbbyte $F setzen 176 x Zeiger vorsetzen, hinter Distanz * 
* 177 * PHX MAC 
| BBR1 EQU Ü1#$19.$@F 178 pe HEX DA 
| * 179 <<< ee 
| * OP CODE setzen 180 * * 
| * 181 * CMP INDIRECT OP CODE D2 * PHY OP CODE 54 
DFB BBRIl 182 * * 
| FIN 185 x Syntax: >>> CMPI.ZP-ADDR o. * Syntax: >>> PHY 
DS I 184 x >>> CMPI.ZP-LABEL * 
| <<< 185 % PHY MAC 
* 1856 CMPI MAC HEX 5A 
* BBS [#(8-7)] OP CODES 8F-FF 187 CMP_ (ÜL,X) ze 
| * 188 Ds -2 * 
| * Syntax: >>> BBS.®-7;ZP-ADDR; ADDR 189 HEX D2 ; CMP IND * PLX OP CODE FA 
* >>> BBS.8-7;ZP-LABEL ; LABEL 199 Ds ı 3 
* 191 <<< * Syntax: >>> PLA 
BBS MAC 192 x * 
| Ds 1 193 % DEA (DECREMENT ACCU ) OP CODE 3A PLX MAC 
| BNE U3 194 x HEX FA 
DS -3 195 % Syntax: >>> DEA <<< 
| DO  ÜI1&SFFFE | 196 * * 
JMP $#9 197 DEA MAC | * PLY OP CODE TA 
ELSE 198 * = 
LDA (02,X) 199 * OP CODE für DEA setzen * Syntax: >>> PLY 
DS -2 200 * * 
EQU 8+U1x$19.$0F 2@1 HEX 3A , DEA PLY MAC 
DFB BBS1l ; BBS 202 <<< HEX 7A : PLY 
FIN 203 * <<< 
Ds 1 264 * EOR INDIRECT OP CODE 52 * 
<<< 205 * * RMB [#(d-7)] OP CODES 87-77 
* 206 x Syntax: >>> EORI,ZP-ADDR o. * 
* BIT IMMEDIATE OP CODE 89 207 x* >>> EORI.ZP-LABEL * Syntax: >>> RMB.®-7;ZP-ADDR 
* 208 * * >>> RMB.®-7;ZP-LABEL 
* Syntax: >>> BIT.$NUMBER 269 EORI MAC * 
* >>> BIT.LABEL 218 EOR (U1,X) MAC 
* 211 Dis -— EOR (U2,X) 
BIT MAC 212 HEX 52 ; EOR IND | Is —-1 
DO ÜL1&SFFRB 213 ps 1 DO ÜI1&S$FFFS 
JMP $#8 214 <<< JMP $#® 
ELSE 215 * ELSE 
EDA. Ur 216 * INA ( INCREMENT ACCU ) OP CODE 1A EQU Ü1x$19.$0F 
Ds -2 217 # DFB RMBIl 
HEX 89 ; BIT IMM. 218 x* Syntax: >>> INA FIN 
Ds 1 219 * ps 1 
FIN 228 INA MAC <<< 
<<< aRl HEX 1A * 
222 <<< * SBC INDIRECT OP CODE F2 
BIT ABS,X / ZPG,X OP CODES 3C, 34 223 % * Syntax: >>> SBCI.ZP-ADDR o. 
224 x JMP INDIRECT,X OP CODE 7C * >>> SBCI.ZP-LABEL 
Syntax: >>> BITX.ADDR o. 225 %* * 
>>> BITX.LABEL 226 x* Syntax: >>> JMPIX.ADDR o. | SBCI MAC 
* 227% >>> JMPIX.LABEL SBC (01,X) 
BITX MAC ; 228 %* Ds -2 
UANFG EQU * 229 * ADDR muß nicht auf ZPG liegen ! HEX F2 ; SBC IND 
STA UL,X 230 x Ds 1 
| ÜBYTES EQU »#-ÜANFG 231 JMPIX MAC <<< 
| DS  -UBYTES 232 HEX 7C : JMP IND,X * 
| DO ÜBYTES-2 233 DA U * SMB [#(ß-7)] OP CODES 87-F7 
HEX 3C : BIT ABS,X || 234 de * 
ELSE 2355 %* * Syntax: >>> SMB.®-7;ZP-ADDR 
HEX 34 ; BIT ZPG,X 236 * LDA INDIRECT OP CODE B2 * >>> SMB.ß-7;ZP-LABEL 
FIN 237  %* “ 
DS ÜBYTES-1 238 %& Syntax: >>> LDAI.ZP-ADDR o. SMB MAC 
<<< 239 %* >>> LDAI.ZP-LABEL EOR (02,X) 
== 240 * DS -1 
BRA OP CODE 89 241 LDAI MAC DO Ü1&$FFFE 
* 242 LDA (Ü1,X) JMP  $#+9 
* Syntax: >>> BRA.ADDR | 243 DS —- ELSE 
>>> BRA.LABEL ı 244 HEX B2 ; LDA IND EQU 8+U1»$19.$ßF 
|| 245 Ds 1 DFB SMBi ; SMB 
MAC 246 <<< FIN 
2A7 %* Ds 1 
vorläufigen OP CODE für bedingten 248 %* ORA INDIRECT OP CODE 12 <<< 
Sprung einfügen; 249 %* * 
Sprungdistanz prüfen und ggf. 250 x& Syntax: >>> ORAI.ZP-ADDR o. * STA INDIRECT OP CODE 92 
BAD BRANCH melden; Distanz setzen 251 %* >>> ORAI.ZP-LABEL * Syntax: >>> STAI.ZP-ADDR o. 
252 %* * >>> STAI.ZP-LABEL 
BNE Ul 253 ORAI MAC * 
254 oRA (U1,X) | STAI MAC 
Zeiger zurück auf vorl. OP CODE 265 DS 2 STA (0U1,X) 
256 HEX 12 ; ORA IND Ds -2 
Ds -2 257 Ds 1 HEX 92 ; STA IND 
258 <<< DS l 
OP CODE für BRA setzen 259 * <<< 
260 * PHX OP CODE DA 
HEX 89 261 * 
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355 















356 ÜBYTES EQU 









350 x Syntax: >>> STZ.ADDR o, 
361 x >>> STZ.LABEL 
352 %* 

309 ST% MAC 


354 UANFG EQU x* 


STA ul 
*-UANFG 


357 DS -ÜBYTES 

358 DO _ÜBYTES-2 

359 HEX SC ; STZ ABS 
369 ELSE 

361 HEX 64  sTz ZPE 
362 FIN 

363 DS ÜBYTES-1 


<ci< 










* 
* STZ ABS,X / ZPG,X OP CODES 74, 9E 
* 
* Syntax: >>> STZX,ADDR o. 
* >>> STZX, LABEL 
* 
STZAX MAC 
* 
* aktuellen Zeigerstand merken 
ra %* 
375  UANFG EQU * 
376 * 
377 %& Speicherzugriff simulieren, um über 
378 %* vorläufigen OP CODE ein Byte zu re- 
379 %* servieren und die ADDR zu setzen 
380 * 
381 STA. UI,X 
382 %* 
383 x Länge der Instruktion berechnen 





SCREEN80 
80-Z/Z-Bildschirm-Dump von U. Stiehl 


Druckt (nach PR#3) den Bildschirminhalt der 
8®-Zeichenkarte von IIo/IIe auf Image-Writer 
sowie auf Epson MX-8ß und Epson FX-8ß, falls 
letztere den Befehl Ctrl-I-N zum Abstellen 
des Bildschirmechos kennen. SCREEN8S® belegt 
den Speicher $83@8-$®3AD. Der Quellcode 
befindet sich auf der Peeker-Sammeldisk, 


Dump aufrufen mit CALL 768 
(ohne vorheriges PR#]) 


Mögliche Modifikationen: 

POKE 771, S (= Drucker-Slot 1-7; normal 1) 
POKE 772, E (= Erste Zeile 1-22; normal 1) 
POKE 775, L (= Letzte Zeile 2-24; normal 24) 


1 DATA 76,19,3,1,1,24,9,9,0,0 

11 DATA 165,54,141,8,3,165,55,141,9,3 

12 DATA 173,3,3,32,149,254,160,0,140,7 

13 DATA 3,185,45,3,249,17,32,171,3,172 

14 DATA 7,3,209,268,239, 137,206,0,174,174: 
REM 137, 286, ® = Ctr1i-I+N + Endnarker 
REM 174 . Füller für längeren Befehl 

15 DATA 174,174,174, 173,4,3,56,233,1,141 

16 DATA 6,3,32,193,251,1690,9,169, 169,141 

17 DATA 85,192,289,49,288,14,141,84, 192,289 

18 DATA 40,208,7,209,192,49,208,237,240,42 

19 DATA 169,9,140,7,3,173,6,3,32,193 

28 DATA 251,172,7,3,141,85,192,32,154,3 

21 DATA 172,7,3,141,84,192,32,154,3,172 

22 DATA 7,3,209,192,49,268,221,169,141,32 

23 DATA 164,3,238,6,3,173,6,3,285,5 

24 DATA 3,144,175,173,8,3,133,54,173,9 

25 DATA 3,133,55,96,177,48,9,128,291,160 

26 DATA 176,2,1905,64,141,84,192,32,171,3 

27 DATA 96,108,54,9 

28 RESTORE 

29 FOR X = 768 TO 941: READ Y: POKE X,Y: NEXT 
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384 
385 
386 
387 
388 
389 
390 
391 
392 
393 
394 
395 
396 
397 
398 
399 
ade 
401 
482 
483 
484 
485 
46 
aD7 
498 
489 
418 
411 
412 
413 
414 
415 
416 
417 
418 


* 


ÜBYTES 


* 


* 
+ 
* 


TRB MAC 
UANFG 
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sta ül 
ÜBYTES EQU #-ÜANFG 
DS _-ÜBYTES 
Zeiger auf Byte mit vorl, OP CODE DO ÜBYTES-2 
zurück HEX IC ; TRB ABS 
ELSE 
DS -ÜBYTES HEX 14 ; TRB ZPG 
FIN 
Ist es ein Zweibytebefehl? DS 
<< 


EQU x#-UANFG 


ÜBYTES-1 


DO  ÜBYTES-2 * 
* TSB ABS / ZPG 
nein, Dreibytebefehl; entspr. * 
OP CODE setzen * Syntax: >>> TSB.ADDR o, 
* >>> TSB, LABEL 
HEX 9£E ; ABS,X 434 %* 
ELSE 435 TSB MAC 
436 UANFG EQU 
Ja, Zweibytebefehl; entspr. 437 STA 
OP CODE setzen 438 ÜBYTES EQU 
439 DS 
HEX 74 ; ZPG,X | dad DO 
FIN 44l HEX GC 
442 ELSE 
Zeiger vorsetzen, hinter ADDR 443 HEX 94 
DS  ÜBYTES-1 | 444 FIN 
<<< | 445 DS 
446 <<< 
OF CODES 14,1C 447 FIN 


OP CODES B4,6c 


TSB ABS 

TSB ZPG 

ÜBYTES-1 

TRB ABS / ZPG 

Hinweis: Da viele eine Apple mit deutschem | 
Zeichensatz benutzen, haben wir 


hier das Merlin-Macro-Symbol 
} = Ü nicht kodiert. Anm. d, Red. 


Syntax: >>> TRB,ADDR o, 
>>> TRB,LABEL 


EQU + 


Apple DOS 3.3 — 
Tips und Tricks 


von U. Stiehl 
2. Aufl. 1984, 216 S., mit zahlreichen, 
ausführlich kommentierten Programm- 
listings, kart., DM 28, — 
ISBN 3-7785-1049-5 


Dr. Alfred Hüthig Verlag : Postf. 102869 : 6900 Heidelberg 1 
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Inzwischen gibt es in fast jeder Großstadt 
mindestens eine Mailboxstation. Um 
auch mit dem Apple Zugang zu diesen 
Diensten zu erhalten, benötigt man nicht 
nur einen Akustikkoppler oder ein Modem, 
sondern auch ein entsprechendes Pro- 
gramm. Ein solches Programm will ich Ih- 
nen hier vorstellen. Als Voraussetzung be- 
nötigt man einen Apple II mit dem Be- 
triebssystem DOS und eine serielle 
Schnittstelle in Slot 2. Bei Verwendung 
eines anderen Slots als Slot 2 oder eines 
anderen Bausteines als des 6850 müssen 
die entsprechenden Werte in dem Pro- 
gramm modifiziert werden. Das Programm 
kennt drei Betriebsarten. 


1. Dialog-Modus 


In dieser Betriebsart ist der Apple ein 
asynchron arbeitendes Terminal. Jeder 
Tastendruck wird an die Gegenstelle ge- 
sendet. Ausnahme: Ctrl-B zeigt die aktu- 
elle Empfangsspeicheradresse an und 
ESC beendet den Modus durch Rück- 
sprung in das Applesoft-Programm. Jedes 
empfangene Zeichen wird auf dem Bild- 
schirm dargestellt und im internen Spei- 
cher, dem Empfangsspeicher, abgelegt. 
Es findet eine automatische LF-Unterdrük- 
kung (Zeilenvorschub Ctri-J) statt, um un- 
nötige Leerzeilen auf dem Bildschirm zu 
vermeiden. Das erste LF nach einem CR 
(neue Zeile Otrl-M) wird ignoriert. 

Der Empfangsspeicher kann als Binärfile 
abgespeichert und später weiterverarbei- 
tet werden. Man kann sich also nachträg- 
lich den ganzen Dialog ansehen und inter- 
essante Stellen oder Menüs ausdrucken, 
um so beim nächsten Mal Zeit zu sparen. 
Es ist also nicht unbedingt nötig, darauf zu 
achten, ob man Download aktiviert hat. 
Wenn der Empfangsspeicher voll ist, be- 
endet das Programm selbsttätig den Dia- 


log-Modus und gibt einen entsprechenden 
Hinweis auf dem Bildschirm. Bei jedem 
Verlassen des Dialogs sendet das Pro- 
gramm XOFF (Citrl-S), um ein Timeout in 
der Gegenstelle zu verlängern. Viele Mail- 
boxen nehmen darauf Rücksicht. Wird der 
Dialog-Modus aktiviert, wird XON (Ctri-Q) 
gesendet, um der Gegenstelle die erneute 
Bereitschaft zu signalisieren. 


2. Upload-Modus 


In dieser Betriebsart werden ASCIl-Datei- 
en gesendet. Wird keine Textdatei auf der 
Diskette gefunden, so versucht das Pro- 
gramm eine Binärdatei in den Speicher zu 
laden. Da in diesem Fall der Emp- 
fangsspeicher überschrieben wird, sollte 
er vorher gespeichert werden. Aus Sicher- 
heitsgründen wird dies von dem Pro- 
gramm noch einmal abgefragt. Dann wird 
der Ausgabevektor auf das Terminalpro- 
gramm gesetzt und die Datei zeichenwei- 
se gesendet. Ein Abbruch ist mittels ESC 
jederzeit möglich. In der Betriebsart Voll- 
duplex findet eine automatische Korrektur 
statt, indem das Empfangsecho mit dem 
gesendeten Zeichen verglichen wird. Bei 
Nicht-Übereinstimmung wird Ctri-H (BS) 
gesendet und die Übertragung des Zei- 
chens wiederholt. 


3. Download-Modus 


In dieser Betriebsart können Dateien emp- 
fangen werden. Jedes empfangene Zei- 
chen wird im Empfangspuffer abgelegt. 
Auch hier findet eine automatische LF- 
Unterdrückung wie beim Dialog-Modus 
statt. 

Im Gegensatz zum Dialog-Modus ist hier 
die Tastatur bis auf die Tasten ESC und 
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Ctrl-B gesperrt. Außerdem wird in der Be- 
triebsart Vollduplex jedes empfangene 
Zeichen geechot, Damit wird der Gegen- 
stelle die Möglichkeit gegeben, die Über- 
tragung auf Korrektheit zu kontrollieren. 
Nach Beendigung des Modus wird die ak- 
tuelle Adresse des letzten abgespeicher- 
ten Zeichens angezeigt. 


In den Betriebsarten 2 und 3 beherrscht 
das Programm das XON/XOFF-Protokoll. 
Weitere Steuerzeichen, die während der 
Übertragung benutzt werden, sind: 


Ctrl-B — STX Es beginnt eine neue Datei, 
Iösche den Empfangsspeicher 

Ctrl-C — ETX Die Datei ist zu Ende 

Ctrl-H — BS Lösche letztes Zeichen 

Ctrl-Q - XON Fahre mit dem Senden fort 

Ctrl-S — XOFF Beende kurzzeitig die 
Übertragung 

Ctrl-X — CAN Gegenstelle wünscht Ab- 
bruch der Übertragung. 


Nach Beendigung einer Übertragung wird 
ein Fehlercode auf dem Bildschirm ange- 
zeigt. Dieser setzt sich folgendermaßen 
zusammen. Code: „BF“ steht für Be- 
triebsart und Fehlercode. 


Betriebsart: 

0 - Empfangen 

2 — Download 

4 — Warten auf XON 


8 — Senden 
Fehlercode: 
O- Kein Fehler 


1 - ESC-Operator-Eingriff 
2 — Ctrl-X empfangen (CAN) 
3 — Timeout erreicht 


Bei den Funktionen UPLOAD und DOWN- 
LOAD ist zu beachten, daß die Gegenstel- 
le den gleichen Dialog-Modus (das gleiche 
Übertragungsprotokoll) erfüllt. Nicht alle 
Mailboxsysteme senden Kontrollzeichen 
als Echo zurück. Die Fehlerabfrage ist in 
diesem Fall aus dem Programm herauszu- 
nehmen. Zur Zeit gibt es leider noch keine 
bindende Vereinbarung. Im Zweifelsfall 
muß in Halbduplex ohne automatische 
Korrektur übertragen werden. 


Alle zeitkritischen Programmteile sind in 
Assembler geschrieben. Das Menü wurde 
der Einfachheit halber in Applesoft reali- 
siert. So kann das Hauptprogramm pro- 
blemlos an individuelle Wünsche angepaßt 
werden. Das Applesoft-Programm gliedert 
sich in 4 Teile: 
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1000-1500 Hauptprogramm 

1500-2000 Initialisierung 

2000-8000 Unterprogramme (lt. Menü) 
9000-9999 Sonstige Unterprogramme. 
Interessant dürfte das Line-Input-Unter- 
programm (ab 9080) sein. Es wird nicht 
der String mittels GET-Befehlen zusam- 
mengeseizt, sondern die Monitorroutine 
GETLN aufgerufen und der String durch 
PEEK aus dem Eingabespeicher ab $0200 
ausgelesen. Diese Methode dauert zwar 
etwas länger, arbeitet aber auch beim Le- 
sen von Textdateien einwandfrei. Die Pau- 
se während des Auslesens stört auch 
nicht weiter, da die Gegenstelle nach ei- 
nem CR meistens etwas Zeit benötigt, um 
den empfangenen Satz abzuspeichern. 
Das Programm gibt folgende Befehle an 
das serielle Schnittstellen-Treiberpro- 
gramm, eingeleitet durch Ctrl-|: 


TD- schalte RTS an 

TS - schalte RTS ab 

Tx - selektiere Übertragungsgeschwindig- 
keit 

UYYN - arbeite ohne automatisches CR 

O — schalte Echo auf Bildschirm ein (wenn 
vorhanden, nur bei Simplex benötigt) 

O - schalte Echo auf Bildschirm aus 


Der Empfangsspeicher beginnt bei $2500 
und kann maximal bis zur DOS-Grenze 
$9600 anwachsen. Ab $9500 erscheint 
aber schon die Meldung: „PUFFER ZU 
GROSS“. Der Speicher muß nun gesi- 
chert oder gelöscht werden. Wenn das 
Applesoft-Programm erweitert werden 
soll, muß man unter Umständen das As- 
sembler-Programm verschieben, um neu- 
en Platz zu erhalten. Das Assembler-Pro- 
gramm grenzt unmittelbar an das Ap- 
plesoft-Programm. Es beginnt mit einer 
Sprungtabelle und einer Parameter- 
tabelle. Die Hauptteile des Programms 
können also geändert werden, ohne daß 
das Applesoft-Programm an neue Adres- 
sen angepaßt werden muß. Das Assem- 
bler-Programm besteht aus den Teilen 
Dialog, Upload, Download, sende Byte, 
empfange Byte. Am Ende des Programms 
befindet sich eine Tabelle, die alle Steuer- 
codes enthält. Durch Austausch dieser Ta- 
belle können auch andere Steuercodes 
ausgewertet werden, ohne daß das Pro- 
gramm neu assembliert werden muß. Das 
Assembler-Programm wurde auf größt- 
mögliche Universalität ausgelegt. Es ist 
auch ohne weiteres möglich, mit den glei- 
chen Routinen und einem anderen Ap- 
plesoft-Programm ein Mailboxsystem zu 
schreiben. Viel Spaß bei der Datenübertra- 


gung. 


4 Telekommunikarion 2-4 





DB-MEISTER 


Adreß- und Schemabriefprogramm 





Der DB-Meister ist ein in Assembler 
geschriebenes, ungewöhnlich schnel- 
les, unkompliziertes und zugleich 

„narrensicheres“ Adreß-, Datei- und 

Schemabriefprogramm. 

Der DB-Meister dient zum Anlegen, 

Pflegen, Sortieren, Selektieren und 

Ausdrucken von Dateien aller Art. Als 

Apple-Benutzer wissen Sie, wie lang- 

sam viele Programme dieser Art sind. 

Nicht so der DB-Meister! 

Drei Beispiele: 

— Jeder beliebige von 560-999 Re- 
cords wird nach Indexfeldern in 0,2 
Sekunden gefunden. 

— Eine komplette Datendiskette mit 
z.B. 600 Records laßt sich in 1 
Minute nach 3 Feldern sortieren 
und untersortieren. Dabei ist die 
Zeit für Diskettenzugriff bereits mit- 
gerechnet. 

— Das Einlesen eines 50 Sektoren 
langen Programm-Moduls dauert 
nur 3,5 Sekunden. 


Technische Daten des DB-Meisters 
— Recordlänge bis zu 230 Zeichen 


— 960 bis 1000 Records pro Daten- 
diskette 


— Maximal 25 Felder pro Record 


— 4 Datentypen (String, Integer, Dezi- 
malzahl, Real) 


— suche nach 3 Indexfeldern — je 4 
Zeichen lang — mit Wildcard-Funk- 
tion 

— Sortieren und Filtern (kumuliertes 
Selektieren) geschieht nach den 
Index-Feldern 


— Ausdruck der Dateien als Etiketten, 
Listen und Schemabriefe (mit Fel- 
der- und Tastatureinschüben an be- 
liebigen Stellen des Formbriefes) 


— normal kopierbare Programmdisket- 
te, unterteilt in Hauptprogramme 
und diverse Hilfsprogramme 

— einsatzfähig auf Apple Ile oder Ilc. 
(Achtung: Brief-Modul läuft nicht mit 
Videx-Karte!) 

— 256K RAM-Disks verwendbar 

Gesamtpreis 290,- (2 Disketten + 

gedrucktes Manual) 

U. Stiehl 


c/o Dr. A. Hüthig Verlag 
Postfach 10 28 69 - 6900 Heidelberg 
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TERMINAL 


1888 HIMEM: 8192: GOTO 15®® 

1818 CALL DI: PRINT: PRINT 

1828 PRINT "1 - Tempo 

1ß21 PRINT "3 — sichere Daten 

1822 PRINT "5 — lösche Daten 

1823 PRINT "7 — empfange Daten 

1624 PRINT ''9 - Sender Echo ES 

16825 PRINT "A - Voll/Halb duplex 

1027 PRINT "E -— Programm Ende 

1838 PRINT 

1660 GET FU$:FU = VAL (FU$) 

1676 PRINT : PRINT D$"PR#"SE: PRINT : PRINT D$"PR#"SC 

1B8ß ON FU GOSUB 2100,2200,2389,2400,2569, 2600, 3609, 
2800 ,2700 

1898 IF ASC (FU$) = 27 THEN 3309 

1168 IF FU$ = "E" THEN END 

1195 IF ASC (FU$) > 96 THEN FU$ = CHR$ ( ASC (FU$) - 32): 
REM Klein -> Groß 

1118 IF ASC (FU$) < 65 OR ASC (FU$) > 96 THEN 1919 

1128 ON ASC (FU$)} - 64 GOSUB 30P9,31@9,1199,1199,1198, 
2909 

1138 GOTO 1P1® 

1198 RETURN : REM Pseudo GOSUB 

15608 H$ = CHR$ (26) + "B" 

1510 I$ = CHR$ (13) + CHR$ (9) 


Bildschirm" 

läsche Schirm" 
—- sende Text!" 

Test sendung" 
Eingabe Text" 
— Catalog Disk" 
-— Neu Initial." 


yjouonnoanakA»m 
I 
















1528 SC = 9 
15398 SE = 2 
1548 D$ = CHR$ (13) + CHR$ (4): REM DOS 












1545 TI$ = " TERMINAL SIMULATOR AKTIV V:1.3" 
1558 PRINT H$: HOME 
1568 INVERSE : PRINT "TERMINAL SIMULATOR": NORMAL : PRINT 
ja geil 
1588 FOR I = J TO 6 
15968 PRINT : PRINT 
1606 ON I GOSUB 2966, 2100, 2509,2700,3000,2289 
1618 NEXT 
1628 PRINT D$"PR#"SC 
1658 GOTO 1P19 
2160 REM Speed 
2105 PRINT "SPEED ZUR ZEIT = "SP 
211® PRINT "SPEED { 1-19288 2-1208 3-388) ";: GET SP$ 
2115 PRINT SP$ 
2128 SP = VAL (SP$): IF SP< 1 OR SP > 3 THEN 211ß 
2125 PRINT D$"PR+#"SE: PRINT I$"T"SP - 1: PRINT D$"PR#"SC 
213% RETURN 
2206 REM Screen Slot 
2285 PRINT "SCREEN ZUR ZEIT = "SC 
221@ PRINT "SCREEN = SLOT ® ODER 3 ";: GET SC$: 
SC = VAL (SC$) 
2215 PRINT Sc$ 
2228 IF SC <> B AND SC < > 3 THEN 2210 
2225 IF SC = Ö THEN PRINT : PRINT CHR$ (26)"1": PRINT 
2240 PRINT D$"PR#"SC: PRINT D$"IN#"SC 
2245 IF SC = ® THEN POKE 0H,253: POKE OL,24ß: GOTO 226: 
REM JSR $FDF$ 
2256 POKE OL,97 
2255 POKE OH,12 » 16 + SC 
2269 GOTO 2400 
2308 REM Puffer schreiben 
2365 GOSUB 9900 
2310 A$ = "$2500" 
2315 L= 1 + PEEK (BH) * 256 + PEEK (BL) - 
(2 * ABS6 + 5 = 256) 
2328 L$ = STR$ (L} 
2325 GOSUB 9966 
2336 GOTO 2515 
2409 REM Bildschirm löschen 
2485 PRINT H$: HOME 
2Al® PRINT TI$ 
DA15 PRINT m 
2428 RETURN 
2509 REM Puffer löschen 
2505 PRINT "SICHER OB PUFFER GELOSCHT WIRD?";: 
GET FU$: PRINT FU$ 
2518 IF FU$ = "N" OR FU$ = "n" THEN RETURN 
2515 POKE BL,®: POKE BH,37 
2526 INVERSE : PRINT "PUFFER AUF @": NORMAL 
2525 RETURN 
2609 REM sende Datei 
2661 POP : REM wegen ON ERR GOTO 
2662 IF DO = 2 THEN PRINT D$;"PR#";SE: PRINT I1$;"TD": 
PRINT D$; "PR#";SC 
2694 GOSUB 9BBB: REM Input Name 
2606 N1$ = N$:N$ = "TEST": GOSUB 9B49: GOSUB 972 
2607 N$ = N1$ 
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2688 ONERR GOTO 2659 

2610 GOSUB 9069: REM Datei lesen 

2612 ONERR GOTO 268 

2614 CALL UP(DO) 

2616 PRINT CHR$ (13);: IF PEEK (ER) = ® THEN 
PRINT CHR$ (2): REM STX 

2618 IF PEEK (ER) < > ® GOTO 2688: 

REM STX nicht angenommen 

2629 GOSUB 9889: REM LINE INPUT 

2622 FOR I = 1 TO LEN (LI$): PRINF MID$ (LI$,I,1); 

2624 IF PEEK (ER) = Ö THEN NEXT : GOTO 2629 

2638 GOTO 268%: REM Datei Ende 

2658 PRINT ''Kein Textfile gefunden! Empfangspuffer wird 
überschrieben. Vorher sichern? "; 

2652 GET FU$: IF FU$ = "Y" OR FU$ = "y" OR FU$ = "J" OR 
FU$ = "j'" THEN PRINT FU$:N1$ N$:5S1 = S:Dl =D: 
GOSUB 2369:N$ = N1$:D = DL:5 = 51: GOTO 2656 

2654 IF FU$ < > "N" AND FU$ < > "n" THEN GOTO 2652 

2656 PRINT : ONERR GOTO 2669 

2658 A$ = "$250B": GOSUB 9969: GOTO 2662: REM Bin LOAD 

2668 PRINT "DATEI FEHLER CODE:"; PEEK (222): GOTO 26599 

2662 L = PEEK (43617) * 256 + PEEK (43616) + 9472: 
REM Datei-Länge 

2664 CALL UP(DO) 

2666 PRINT CHR$ (13);: IF PEEK (ER) = ® THEN 
PRINT CHR$ (2): REM STX 

2668 FOR I = 9472 TO L: PRINT CHR$ ( PEEK (T)};: 

IF PEEK (ER) = ® THEN NEXT 

2680 E = PEEK (ER) 

2682 PRINT CHR$ (13);: IF PEEK {ER} = ® THEN 
PRINT CHR$ (3): REM ETX 

2684 POKE ER,E 

2686 CALL UE 

2698 POKE 216,0:D$ = CHR$ (13) + CHR$ (4): GOSUB 9946 

2692 IF DO = 2 THEN GOSUB 3945 

2694 GOTO 181ß: END 

2788 PRINT "ECHO ZUR ZEIT "; 

2705 IF MC = 2 THEN PRINT "AKTIV" 

2718 IF MC = 1 THEN PRINT "AUS" 

2715 PRINT "AKTIVIEREN = J ";: GET FU$ 

2728 PRINT FU$ 

2725 IF FU$ = "N" OR FU$ = "n" THEN MC = 1: GOTO 2735 

2738 MC = 2 

2735 PRINT D$"PR#"SE: IF MC = 1 THEN PRINT I$"o": 
POKE EC,®: REM COUT off 

2748 IF MC = 2 THEN PRINT I$'C": POKE EC,128: REM COUT on 

2745 PRINT D$"PR#"SC 

2750 RETURN 

280% REM Testsendung 

2865 IF DO = 2 THEN PRINT D$;"PR#";SE: PRINT I$;"TD" 

2815 CALL UP(DO) 

2820 PRINT : IF PEEK (ER) < > Ö THEN GOTO 2849 

2825 FOR I = 32 TO 127: PRINT CHR$ (I); 

2838 IF PEEK (ER) < > ® THEN GOTO 2849 

2835 NEXT : PRINT 

2849 CALL UE 

2845 IF DO = 2 THEN GOSUB 3945 

2847 RETURN 

2988 REM INIT 

2962 IF DI = Ö THEN DIM UP(2),DO(2) 

2994 PRINT D$"PR#"SE: PRINT I$"UY9N": PRINT D$"PR#"SC 

29586 DI = 2 x 4896: REM Dialog Entry 

2988 IF UP(l}) = Ö AND PEEK (DI) = 76 AND 
PEEK (DI + 3) = 76 AND PEEK (DI + 6) = 76 GOTO 2912 

291® PRINT D$"BLOAD TERMINAL.B, A$2BB9" 

2912 UP{l) = DI + 3: REM UPLOAD Duplex 

2913 DO(l1) = DI + 12: REM DOWNLOAD 

2914 UP{2) = DI + 6: REM UPLOAD Simplex 

29315 DO(2)} = DI + 15: REM DOWNLOAD 

2316 UE = DI + 9: REM UPLOADend 

2928 TX = DI + 18: REM TRANSMIT 

RORR RX = DI + 21: REM RECEIVE 

2924 BL = PEEK (DI + 25) * 256 + PEEK (DI + 24} 

2826 BH= BL +1 

2928 OL = PEEK (DI + 27) x 256 + PEEK (DI + 26) 

29338 OH = OL +1 

2932 TB = DI + 28: REM SENDBYTE 

2934 RB = DI + 29: REM EMPFBYTE 

2936 ER = DI + 36: REM ERRORCODE 

2937 EC = DI + 31: REM ECHO CODE 

2938 RETURN 

3ßdd REM Betriebsart voll/halb DOUPLEX 

3ß@5 PRINT 

3818 PRINT "BETRIEBSART = "; 

3815 IF DO 1 THEN PRINT "VOLL"; 

3628 IF DO = 2 THEN PRINT "HALB"; 

PRINT DOUPLEX" 
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PRINT "VOLL = 1, HALB = 2"; 





TERMINAL.B 





































GET FUS:DO = WAL (FU$): IE’DO < 1] OR DO > 2 1. ler 
THEN 3935 2 * * 
PRINT DO 3 * TERMINAL,B von A. Lecreux 1985 * 
PRINT D$"PR#"SE 4A * r 
IF DO = 1 THEN PRINT I$"TD" 5 een 
IF DO = 2 THEN PRINT I$tTrs" 5 

PRINT D$"PR#"SC 7 DATEN EQU $CB85t$2ß ;Slot 2 seriell 
RETURN 8 STATUS EQU DATEN-lL ;Status seriell 
REM CATALOG Disk 9 KBD EQU $Cd6d ‚Tastatur 

GOSUB 9994 18 KBDSTB EQU KBD+$18 ‚Strobe 

PRINT H$: HOME 1er SEROUT EQU $0297 :Qutput Slot 2 
PRINT DEVYCATALOG SS Den 12 SERIN EQU $C285 Input Slot 2 
RETURN 13 COUT EQU $FDED ;Output 4®ß Zei, 
REM sende String 14 PREYTE EQU S$FDDA 

PRINT "TEXT:";: GOSUB 9989 15 DOSIo EQU $3EA 

IF LIS = Mu GoTo 1916 16  MEMH EQU $25 :Memory H.Byte 
IF DO = 2 THEN PRINT D$; "PR#";SE: PRINT I$;"TD" 17 MEML EQU 8% ‚Memory L.Byte 
CALL UP(DO) 18 TDI EQU $1 ;‚TIMEOUT Dialog 
FOR T= 1 TO LEN (LI$) 19. ZTUPL EQU $5 ;Time UPLOAD Echo 
PRINT MIDS (LI$.I,1): 28 TOUE EQU $29 ‚TIMEOUT normal 
IF PEEK (ER) < > ® THEN 60TO 3396 22 

NEXT : PRINT 23 ORG $2BB0 

CALL UE 24 

IF DO = 2 THEN GOSUB 3645 2000: AU 24 20 25 JMP DIMODE ‚Dialog 

GOTO 1819 2003: AC AA 21 26 JMP UPDOUP ; UPLOAD Duplex 
REM DOWNLOAD Bes: AC 3A 21 27 JMP UPLOAD ‚UPLOAD Simplex 
CALL DO(DO) 2889: AC 95 21 28 JMP  ENDUP ‚Ende UPLOAD 

IF PEEK (ER) = ® AND PEEK (TB) = 147 THEN 2d8C: AC D7 21 29 JMP DOWNLOAD ‚DOWNLOAD Duplex 
GOSUB 2399: GOTO 3619 ZBBF: AC EC 21 30 JMP  DOWNS ; DOWNLOAD Simplex 
RETURN 2612: AC D6 22 31 JMP TXMODE ‚sende Byte 

REM Eingabe-Standart 2815: AC 8F 253 32 JMP RXMODE ‚empfange Byte 
INPUT "FILENAME ";N5 33 

PRINT "SLOT "N IGET 5:5 - WAL I(S$) aB18: 6A 20 34 DA  BUFFER ‚Puffer-Adresse 
IF (S < 1) OR (S > 7) THEN 9904 2aB1lA: 21 29 35 DA OUTl ‚Output Screen 
PRINT S" DRIVE ":: GET DRS 36 

D= VAL (DR$): IF (D< 1) OR (D > 2) THEN 2AlCc: 88 37 TXBYTE DFB ;Puffer 

GET DR$: GOTO 9918 2d1D: B0 38 RXBYTE DFB % 

PRINT D: RETURN 39 

REM 2BlE: 988 Ad ERRBYTE DFB 6 ‚1-EsSC 

REM Übergabe-Konstanten Al x ;2-CAN 

REM | 2 % :3-TIMEOUT 

REM N$ — Dateiname 43 

REM N1$; N2$; Namen bei Renamefunktion 2Bd1ır: 80 AA  ECHOFLAG DFB ;Bildschirm Echo 
REM A$; L$; Anfang und Länge in HEX bei 45 

BIN-Funktionen 46 

REM S - Slot 2828: AC FB FD 47 COUTB JMP COUT+3 

REMD - Drive 48 OoUTl EOU x*-2 

REM V - Volume 49 OUT2 EQU x-1 

REM R - Record 59 

REMB - Byte 2023: 98 51 STATE DFB ;Progr ,-Status 
REM OPEN 5 52 

PRINT CHRS (4); VOPEN":NS:" su:s>u Di-Du yıay 53 * B=Basic, L=DÖWNLOAD, U=UPLOAD, 

RETURN 54 * D=DIALOG, S=Puffer sichern, 

REM CLOSE S 55 

PRINT 56 een“ 
PRINT CHR$ (4) ;"CLOSE":N$ 57 %* 

RETURN 68 3 DIALOG-MODUS 

REM WRITE S 59 3% 

PRINT CHR$ (4); "WRITE";N$ 6 Beer 
RETURN 61 

REM READ S aB24d: AI 44 52 DIMODE LDA #'D' ‚DIALOG 

PRINT CHR$ (4); "READ":NS$ 2026: 8D 23 28 63 sSIA STATE 

RETURN 64 

REM Bin SAVE 2629: AD 97 24 65 ENTRY LDA GOON ;:sende Ctr1l-Q 









PRINT CHR$ (4) ;"BSAVE" NS", ATZAS;"L"SL$,S"; JSR TXMODE 
Sal DNED 
RETURN 


REM Bin LOAD 








Ä JSR RECEIVE 
2832: AD dB ch 69 LDA KBD 













PRINT CHR$ (4); "BLOAD";N$:", AT: AS," Sm:S,0,Dt:D 2B35: 10 F8 78 BPL START :keine Taste 
RETURN 2837: zccldca ı BIT KBDSTB 

REM DELETE 2B3A: CY 9B 72 CMP +#$9B :ESC? 

FRINT CHR$& {4}: "DELETEN:NS:" 5": Su Dee 2030: FB 29 TS BEQ BASIC 

RETURN ZÖ3E: C9 82 TA CMP_ #$82 ‚Ctrl-B? 

REM LINE INPUT LI$ 2849: FO 16 15 BEQ BUFF® ‚Puffer anzeigen 
REM LI$ — Übergabe String 2042: A2 BB 76 LDX #6 

REM LI - Zählervariable 2844: SE 1D 28 77 STX RXBYTE 

POKE 51,890 2047: 20 DE 22 78 JSR TXMODE ‚sende Taste 
CALL 64874 2B4A: AD ID 28 79 LDA RXBYTE ‚etwas empfangen 
ag = er Te 5] 2ß4AD: FO EB 30 BEQ START ‚nein 

LI=LI+ 1: IF PEEK (LI) < > 141 THEN LI$ = LI$ + 2BAF: 28 69 28 81 JSR STORE ‚speichern 

CHR$ { PEEK (LI)): GOTO 9892 2052: 20 A9 28 82 JSR RCBA ;Puffer-Test 








LI$ = LI$ + CHR$ (13): RETURN JMP START 





JSR 
JMP 


BUFF 
START 
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2O5SE: AI A2 88 BASIC LDA #'B! ‚Basic Ende 
2d60: BD 23 28 89 STA STATE 
2063: AD 89 24 9 LDA WAIT 


JMP | TXMODE 
























2069: 8D 93 STORE DFB 320 ‚sta $2508 
2B6A: BB 25 94 BUFFER DFB MEML,MEMH 

286C: EE 6A 28 95 INC BUFFER 

286F: DO 83 96 BNE TESTBUF 

2671: EE 6B 28 97 INC BUFFER+1 

2074: AD 6B 28 98 TESTBUF LDA BUFFER+ 


RTS 





2878: AD A4 CO 181 RECEIVE LDA STATUS 











207B: 2C EF 23 192 BIT RXREADY 

2B7E: FO 31 193 BEQ RETURN nichts empfangen 
194 «* JSR SERIN :lies Byte 
105 * JSR RKMODE 

| 2d80: AD A5 Ch 1ß6 LDA DATEN 

2883: 29 7F 167 AND #S7F 

2085: CD dB 24 198 CMP_ LF 

2088: DB 12 199 BNE RC#9 ;kein LF 

288A: AD F5 23 119 LDA LBYTE ;davor CR 

2B8D: CD 83 24 111 CMP CR 

2098: DO 97 12 BNE RCPß8 :nein 

2092: AD BO 24 113 LDA LF 

2095: BD F5 23 114 STA LBYTE 







RTS 













LDA LF 


289C: 8D F5 23 118 RCB9 STA LBYTE 
2B9F: 89 89 219 ORA #389 
2BAl: 48 129 PHA 


COUT 


STORE 










2BA9: C9 95 124 RCBA CMP +95 

2PAB: FÜ 95 125 BEQ BUFFH ;Puffer zu groß 
2BAD: C9 96 126 CMP #396 

2BAF: FO 20 127 BEQ LOOPZA 


RETURN 


BUFFH BUFF 
























2085: A9 08 131 LDA *#ß 

28B7: 8D 1D 28 132 STA RABYTE 

2BBA: AD 89 24 133 LDA WAIT ‚sende Ctrl-S 

2BBD: 28 D& 22 134 JSR TAÄMODE 

2BcC9: BB BF 135 BCS LOOP2-2 

2dc2: AD 1D 28 136 LDA RXBYTE | 
2805: DB A2 137 BNE STORE ‚noch etwas empfangen! 
2007: Ag Bl 138 LDA #TDI 

2609: BD F3 23 139 5TA TIME2 

2d0C: 28 8F 23 149 JSR RXMODE ‚enpfange 

2ÖCF: 98 98 14] BCC STORE ‚etwas empfangen 





28D1: A2 99 143 LOOP2ZA LDX #9 ‚Ende DIALOG 
28D3: BD EA 28 144 LOOP2 LDA MSG2,X 

28D6: CI 98 145 CMP U #ß 

20D8: FB 88 146 BEQ LOOP2E 

20DA: 89 BB 147 ORA #589 


COUT 


LOOP2 

























LOOPZE 
;sichern 
‚nach Basic 


2BEA: 8D 87 157 MSG2 DFB %8D,$87 
2BEC: 2A 28 42 158 ASC '* PUFFER ZU GROSS x' 

2BEF: 55 46 46 45 52 20 5A 55 

20F7: 28 47 52 AF 53 53 28 2A . 
$87,$8D,8 





+0 


i :Puffer Ausdruck 
2184: BD 25 21 162 LOOPI LDA MSG1l,X 


2167: C9 B8 163 CMP =#ß 
2189: FO 99 164 BEQ LOOPIE 
21BB: 89 89 165 ORA #+$89 


GOUT 





LOOP1 


2114: AD 6B 28 169 LOOPIE LDA BUFFER+1 
2117: 268 DA FD 178 JSR PRBYTE 
2llA: AD6A RB 171 LDA BUFFER 


PRBYTE 


38 


MSGl 


2B 5A 55 
54 3A 20 


#$8D 
COUT ‚incl. RTS 


$8D 
'* PUFFER ZUR ZEIT: 


are 


* 


* UPLOAD-MODUS 


* 


ee 


UPLOAD LDA 
STA 
LDA 
STA 
LDA 
STA 
JMP 


UPDOUP LDA 
STA 
LDA 
STA 
JMP 


UPDOUPl JSR 
BCS 
LDA 
STA 
JSR 
BCS 
LDA 
CMP 
BEQ 
LDA 
STA 
JSR 
LDA 
CMP 
BEQ 
PHA 
LDA 
JSR 
JSR 
BCS 
PLA 
JMP 


PLA 
RTS 


LDA 
JSR 
LDA 
RTS 


LDA 
STA 
LDA 
STA 
JSR 
LDX 
ENDUP1 LDA 
BEQ 
ORA 
JSR 
INX 
BNE 
ENDUPZ LDA 
JSR 
LDA 
STA 


ENDUP3 


45 45 4E 
aF 44 45 


#TXMODE :neuer Vektor 
$36 

#TXMODE/256 

637 

#'U' ; UPLOAD 
STATE 

DOSIO 


#UPDOUP1 ‚neuer Vektor 
636 

#UPDOUP1/256 

$37 

UPL$ 


TXAMODE 

BACK 

#TUPL ; TIMEOUT 
TIME2 

RXMODE ‚Echo enpf. 
BACK2 

TXBYTE 

RXBYTE ‚korrekt? 
BACKS ‚richtig 
#TDI 

TIME2 

RXMODE ‚wegen SYN 2* 
TXBYTE 

RXBYTE 

BACKS 


BS :Korrektur 
UPDOUPL ‚senden 
TXMODE 

BACK® 


UPDOUP1 


ERRBYTE 
COUT® 
TXBYTE 


OUT1 ‚alten Vektor 
536 

OUT2 

$37 

DOSIO 

+9 

ENDUP3,X ;Text ausgeben 
ENDUP2 

#$8% 

COUT 


ENDUP1 
ERRBYTE 
PRBYTE 
r.B! 
STATE 
#$8D 
COUT 


13 
'UPLOAD BEENDET CODE: ' 





Peeker 4/85 








eerrrerrneeeleseeerelerri 


* 
* 
* 


DOWNLOAD-MODUS 


EREFFEFHRFFRETERFFFFFFTFFFIEFEFEFFERIEEIFEE 


DOWNLOAD JSR 


DOWNI1 


DOWNS1 


DOWNS2 


DWCAN 


DWBS® 


DWBS1 


DWNEW 
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BCS 
JSR 
BCS 
LDA 
PHA 
JSR 
PLA 
JMP 


JSR 
BCS 
JSR 
BCS 
LDA 
JSR 
JSR 
BCE 
JMP 


LDA 
STA 
SEC 
RTS 


DEC 
BPL 
LDA 
CMP 
BNE 
LDA 
CMP 
BEQ 
DEC 
ELC 
RTS 


EQU 


LDA 
STA 
LDA 
STA 
RTS 


LDA 
STA 
LDA 
JSR 
BCS 
LDA 
RTS 


JSR 
BCS 
LDA 
STA 
JSR 
BCS 
AND 
CMP 
BEQ 
CMP 


‘BEQ 


CMP 
BEQ 
CMP 
BEQ 
CMP 
BEQ 
CMP 
BEQ 
CMP 
BEQ 


CMP 
BNE 
LDA 
CMP 
BNE 
LDA 


DW® 
DOWNSZ 
DW1 
DOWNS2 
RXBYTE 


GOUT 
DOWN1 


DW® 
DOWNS2 
DW1 
DOWNS2 
RXBYTE 
COUT 
DW2 
DOWNS1 
ENDW 


#522 
ERRBYTE 


BUFFER 
DWBSP® 
BUFFER 
+$FF 
DWBS® 
BUFFER+1 
#+MEMH 
DWBS1 
BUFFER+1 


* 


+MEML 
BUFFER 
#+MEMH 
BUFFER+L1 


#'L' 
STATE 
GOON 
TXMODE 
DW4 
+$0D 


TXMODE 
DWA 
+TOUT 
TIME2 
RXMODE 
DWA 
#+$7F 
CAN 
DWCAN 
ETX 
DW3 
EOT 
DW3 
ETB 
DW3 
BS 
DWBS 
STXG 
DWNEW 
S0H 
DWNEW 


LF 
DW29 
LBYTE 
CR 
DW28 
LF 


‚starte 


‚empf, & speich. 


‚sende Echo 
‚starte 
‚empf. & speich 


‚Schleife Start 


‚Puffer - ] 


:Überlauf 
‚nein 


;:Puffer 
J& 


;Puffer 


;Reset Counter 


; DOWNLOAD 


:sende Start 


;—CR- 


;sende Echo 


Error 


;Abbruch 

‚Text Ende 
‚Übertragung Ende 
‚Übertragung Ende 
;Korrektur 


‚Start Übertr. 


:Start Übertr. 


‚kein LF 
‚davor CR 


‚nein 


ENDWS 


28 42 45 
2B 453 AF 


DFB 


#0 
ENDW3,X 
ENDW2 
#580 
COUT 


ENDW1 
ERRBYTE 
FRBYTE 
ie 
STATE 
+$8D 
COUT 
BUFF 
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;Puffer zu groß 


‚Text ausgeben 


‚Basic Ende 


‚Puffer anzeigen 


"DOWNLOAD BEENDET CODE: ' 


D 


rennen 


* 
* 
* 


TRANSMIT-MODUS 


FERFEFFFTEEEF FETT FFFEEEEIITITSEEIEEE 


TXMODE 


ORA 
STA 
LDA 
STA 
STA 
STA 


LDA 
BIT 
BEQ 
JSR 
LDA 
AND 
CMP 
BEQ 
CMP 
BNE 
LDA 
BNE 


ORA 
STA 
JSR 


BIT 
BPL 
BIT 
LDA 
CMP 
BNE 
LDA 
STA 
SEC 
RTS 


LDA 
BIT 
BEQ 
LDA 
AND 
JSR 
STA 


#589 
TXBYTE 
#9 
TIME® 
TIMEL 
ERRBYTE 


STATUS 
RXREADY 
TM2 
SERIN 
DATEN 
#$67F 
WAIT 
WAITSUB 
CAN 
NOUT 
+$82 
TM3 


+$839 
RXBYTE 
COUTB 


KBD 

TMP 
KBDSTB 
KBD 

#27 

TMd 
#$81 
ERRBYTE 
ABBRUCH 


STATUS 
TXREADY 
TMl 
TXBYTE 
+$7P 
SEROUT 
DATEN 


‚rette Byte 


‚empfangen 


‚lies Byte 


‚warten 


‚Abbruch 


‚Taste gedrückt 


‚sender leer 
;hole Byte 


;sende Byte 
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ECHOFLAG 








| 232F: 2c IF 28 427 BIT LDA STATE 
2332: 18 85 428 BPL TM@L nein CMPU 9 #'U! ;: UPLOAD? 
2334: 99 89 429 ORA #$89 BEQ RMA ‚keine Anzeige 
2336: 20 28 28 438 JSR COUT® JSR BUFF 
2339: 18 a31l TMO1 ELE ‚alles ok JMP RM 
233A: 60 432 RTS 
433 INC TIME 
434 %-—-———— 1... BNE RM® 
| 435 INC TIMEL 
2338: AY dB 436 WAITSUB LDA #8 BNE RM® 
| 233D: 8D Fl 23 437 STA TIME® DEC TIME2 
| 2340: 8D F2 23 438 STA TIMEI BNE RM 
2343: 8D 1E 28 439 STA ERRBYTE LDA #3 
2346: A9 28 4AAd LDA #TOUT BNE RM2 ; TIMEOUT 
2348: 8D F3 23 441 STA TIME2 
442 kn 
234B: AD A4 CO 443 WS LDA STATUS 
234E: 2C EF 23 444 BIT RXREADY ‚empfangen 23ER: 91 RXREADY DFB 1 ‚STATUS 
2351: Fß 13 445 BEQ WS1 23FB: 82 TXREADY DFB 2 
A446 * JSR SERIN :lies Byte 23F1: BB TIMEO DFB ® ; Time-Count 
2353: AD A5 Ch 447 LDA DATEN 23F2: 86 TIMEL DFB 9 
| 2356: 29 7F 448 AND #$7F 23F3: 06 TIME? DFB 9 
| 2358: CD 07 24 449 CMP_ GOON ;weiter 23F4: dB TIME3 DFB ® 
235B: FB C2 A508 BEQ TM® 23F5: 98 537 LBYTE DFB 8 ‚letztes Byte 
235D: CD BE 24 451 CMP CAN ‚Abbruch 538 
2368: DB 9F 452 BNE NOUT 23F6: dB 539 CTRL DFB 
2362: A9 42 453 LDA +#$42 23F7: 61 549 SOH DFB 1 
2364: DO 11 454 BNE WS2 ‚merke Byte 23F8: 92 541 STX® DFB 2 
455 23F9: 83 542 ETX DFB 3 
2366: 2C DO Ch 456 WSl BIT KBD ‚Taste gedrückt 2SFA: 84 543 EOT DFB 4 
2369: 18 11 457 BPL WS3 23FB: 85 544 ENO DFB 5 
256B: 2C 16 cd 458 BIT KBDSTB 23FC: B6 545 ACK DFB 6 
236E: AD BB CO 459 LDA KBD 23FD: 97 5456 BEL DFB 7 
2371: C9 1B 46P CMP_ #27 ;ESC? S3FE: 08 547 BS DFB 8,9 
2373: DÖ 67 461 BNE WS3 2408: BA 548 LF DFB 18,11,12 
| 2375: A9 Al 462 LDA #$41 2403: BD 549 CR DFB 13 
| 2377: BD 1E 28 463 WS2 STA ERRBYTE ‚merke 2494: OR 5568 SO DFB 14 
23TA: 38 464 SEC ‚Abbruch 2485: BF 551 SI DFB 15,16 
D3T7B: 6A 465 RTS 2407: 11 552 GOON DFB 17,18 
466 2409: 13 553 WAIT DFB 19,28 
237C: EE F1 23 467 W53 INC TIMEß 248B: 15 554 NAK DFB 21 
237F: DB CA 468 BNE WS@ 2480: 16 555 SYN DFB 22 
2381: EE F2 23 469 INC TIMEL 24A0D: 17 556 ETB DFB 23 
2384: DB C5 479 BNE WS 24BE: 18 19 1A 557 CAN DFB 24,25,26,27,28,29,38,31 
2386: CE F3 23 471 DEC TIME2 2411: IB 1C 1D lE IF 
2389: DB CO 472 BNE WS® 
238B: A9 43 473 LDA #843 = 
238D: D® E8 474 BNE WS2 ; TIMEOUT 
475 
476. Besserer 
477 %* 
AB * RECEIVE-MODUS 
A479 %* 
480. web h BR rt 
481 
482 RXMODE EQU * 
238F: A9 BB 483 LDA #9 
2391: 8D Fl 23 484 STA TIMEß 
2394: 8D F2 23 485 STA TIMEI 
2397: 8D 1E 28 486 STA ERRBYTE 
239A: AD F3 23 487 LDA TIME? 
239D: BD FA 23 488 STA TIME3 ;TIMEOUT retten 
489 
25Aß: AD AA CO 490 RMO LDA STATUS 
23A3: 2C EF 23 491 BIT RXREADY ‚Byte da 
2346: FO BD 492 BEQ RMIl 
A953 * JSR SERIN ‚lies Byte 
2348: AD Ab CB 494 RMOG LDA DATEN 
23AB: BD F5 23 495 RMß9 STA LBYTE 
23AE: 99 80 496 ORA #+$80 
| 23B8: 8D ID 28 497 STA RXBYTE Eu 
is % u Der nächste Peeker 
Be m er acnste e 
508 
23B5: 2C 08 cd 581 RMI BIT KBD ‚Taste 
2388: 18 22 562 BPL RM4 ;nein Heft 5/1985 
23BA: 2C 10 CO 583 BIT KBDSTB 
23BD: AD Bd cd 584 LDA KBD 5 
2300: CO IB 585 CMP 427 er erscheint am 
2302: DO 87 586 BNE RM3 
2304: A9 Bl 597 LDA #1 
2306: 8D 1E 26 568 RM2 STA ERRBYTE ;Abbruch Code 
2309: 38 589 SEC :Fehler 5 = 
23CA: 6D 516 RTS 
511 
23CB: C9 92 512 RM3 CMP_ #82 ;Ctrl-B 
| 23CD: DB AD 513 BNE RMA 
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In diesem zweiten Teil vermitteln wir das systematische 
Grundgerüst der Befehle, Parameter und Dateitypen des Pro- 
DOS-BASIC.SYSTEMs. Falls Sie Apple-Neuling sind und des- 
halb das alte DOS 3.3 nicht kennen, so werden Sie einiges 
zunächst nicht verstehen. Lassen Sie sich jedoch dadurch 
nicht entmutigen, denn diese Folge ist zum späteren Nach- 
schlagen sowie als Gesamtüberblick gedacht. In den nachfol- 
genden Teilen unserer ProDOS-Serie wird jeder Befehl detail- 
liert mit vereinfachten Beispielprogrammen erläutert. 





Teil 2: Das definitorische Grundgerüst 


1. BEFEHLSTYPEN 


Befehle an das BASIC.SYSTEM bestehen 
aus Befehlsnamen, die wie unter DOS 3.3 
in zwei Formen erteilt werden können: 


Direkte Befehle (Nicht-RUN-Modus): 
Diese können über die Tastatur eingege- 
ben werden. Vor dem Befehl muß implizit 
und nach dem Befehl explizit ein Return 
(Rtn, Ctrl-M) stehen, z.B. 
(Rtn implizit) 
CATALOG Rtn 
Das Return vor dem Befehl gilt immer 
dann als implizit vorhanden, wenn der 
Cursor nach dem Prompt-Zeichen „U“ am 
linken Bildschirmrand blinkt. Führende 
Leertasten wären erlaubt, z.B. 

CATALOG 
Dagegen sind andere Zeichen nicht zuläs- 
Sig #23. 
:CATALOG 
Schließlich sind auch mehrere BASIC.SY- 
STEM-Befehle innerhalb derselben Einga- 
bezeile nicht möglich, z.B. 
CATALOG: CATALOG 


Indirekte Befehle (RUN-Modus): 

Diese werden während des laufenden, 
nicht-compilierten Applesoft-Programms 
an das BASIC.SYSTEM erteilt. Man be- 
achte also, daß im Gegensatz zu DOS 3,3 
kein Integer-Basic-, kein compiliertes Ap- 
plesoft- und auch kein Assembler-Pro- 
gramm als RUN-Modus gilt. Dem Befehl, 
der im RUN-Modus in Anführungszeichen 
gesetzt wird, geht (normalerweise) ein im- 
plizites Return sowie auf alle Fälle stets ein 
Gtrl-D = CHR$ (4) voraus. Ferner muß der 
Befehl durch ein explizites Return abge- 
schlossen werden, z.B. 

10 PRINT: PRINT CHR$ (4) "CATALOG" 
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Das Otr-D muß das erste Zeichen einer 
PRINT-Anweisung sein, die ihrerseits ent- 
weder unmittelbar der Zeilennummer oder 
unmittelbar dem Doppelpunkt (Statement- 
Separator) folgen muß. Mehrfach-Befehle 
in derselben Programmzeile sind zulässig, 
2. 
10 PRINT CHR$ (4) "CAT*: PRINT CHR$ 
(4) "CAT" 
Der Befehl in Anführungszeichen kann 
durch eine String-Variable ersetzt werden, 
z.B. 
10X$ = CHR$ (4) + "CAT" 
20 PRINT X$ 
Im Gegensatz zu DOS 3.3 befindet sich 
das BASIC.SYSTEM stets im sog. nicht- 
sichtbaren Pseudo-Trace-Modus, der 
nach jeder neuen Zeilennummer sowie 
nach jedem Doppelpunkt wirksam wird. 
Deshalb sind einige syntaktische Feinhei- 
ten gegenüber DOS 3.3 zu beachten: 


Beispiel 1: 

10X$ = CHR$ (4) + "CATALOG" 

20 PRINT "AAA“;: PRINT X$ 

Hier wird der CATALOG-Befehl ausge- 
führt, obwohl nach „AAA“ ein Semikolon 
folgt und somit kein implizites Return vor- 
angeht. Grund: PRINT X$ steht nach ei- 
nem Doppelpunkt. Bei DOS 3.3 würde 
demgegenüber nur „AAACATALOG” am 
Bildschirm angezeigt und somit der CATA- 
LOG-Befehl ignoriert. 


Beispiel 2: 

10X$ = CHR$ (4) + "CATALOG" 
POS DIE 

30 PRINT X$; Y$: REM richtig 

40 PRINT X$;: PRINT Y$: REM falsch 
Hier sind Befehlsname und Parameter ge- 
trennte Strings. Werden diese wie in Zeile 


4 prodos 4 


ProDOS für Anfänger ........ 


30 als ein einziger PRINT-Befehl ausge- 
führt, dann ist das BASIC,SYSTEM „zu- 
frieden”. Erfolgt indessen eine Aufsplit- 
tung wie in Zeile 40, so führt dies zu einem 
Syntax-Error. Unter DOS 3.3 wäre demge- 
genüber eine Aufteilung zulässig. 


Beispiel 3: 

10 R$ = CHR$ (13): REM Ctri-M 

20 C$ = CHR$ (4) + "CATALOG" 

30 PRINT R$: PRINT C$ 

40 PRINT R$; C$ 

Hier wird zusätzlich ein nacktes Return als 
String-Variable definiert. In Zeile 30 wäre 
das BASIC.SYSTEM „zufrieden“ (im Ge- 
gensatz zu der falschen Angabe in dem 
englischen ProDOS-Handbuch der Firma 
Apple). In Zeile 40 hingegen würde eine 
Fehlermeldung entstehen, weil nunmehr 
Gtrl-D nicht mehr das erste Zeichen der 
Zeichenkette wäre. Unter DOS 3.3 würde 
Zeile 40 fehlerfrei ausgeführt. 


Als Fazit halten wir fest, daß ein indirekter 
BASIC.SYSTEM-Befehl nur dann korrekt 
ausgeführt wird, wenn das Cirl-D das erste 
Zeichen der PRINT-Anweisung ist und 
wenn diese bis zum nächsten Statement- 
Separator („:“ oder $00 als End of Line) 
komplett gePRINTet wird und nicht durch 
ein Semikolon, das das Return unterdrük- 
ken würde, abgeschlossen wird. Ferner 
sei darauf hingewiesen, daß das Otrl-D 
wahlweise als CHR$ (4) mit Bit 7 off oder 
als CHR$ (132) mit Bit 7 on (4 + 128 = 
132) definiert werden könnte. 


Die Textdatei-Befehle OPEN, READ, 
WRITE, POSITION und APPEND sind üb- 
rigens reine Indirekt-Befehle, während alle 
anderen Befehle sowohl im RUN- wie 
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auch im Nicht-RUN-Modus an das BASIC- 
‚SYSTEM erteilt werden können. 


Im BASIC.SYSTEM sind folgende Befehle 
implementiert worden: 


Allgemeine Befehle 

CAT: Anzeige des Gatalogs in 40 Z/Z 
CATALOG: Anzeige des Catalogs in 80 Z/Z 
PREFIX: Definition des Default-Directory 
CREATE: Anlage einer neuen Datei 
RENAME: Umbenennung einer Datei 
VERIFY: Dateiname prüfen 

DELETE: Datei löschen 

LOCK: Dateiname mit Sternchen verse- 
hen (Schreibschutz) 

UNLOCK: Sternchen entfernen 

PR#: Änderung der Ausgabe-Vektoren 
IN#: Änderung der Eingabe-Vektoren 
BYE (Reboot bei ProDOS 1.1.1) 


Applesoft-Befehle 

RUN: Starten eines Applesoft-Programms 
LOAD: Laden eines Applesoft-Programms 
SAVE: Speichern eines Applesoft-Pro- 
gramms 

CHAIN: Starten eines Applesoft-Moduls 
STORE: Speichern aller Applesoft-Varia- 
blen 

RESTORE: Laden aller Applesoft-Varia- 
blen 


Textdatei-Befehle 

OPEN: Öffnen einer Textdatei 

READ: Lesen von einer Textdatei 
WRITE: Schreiben auf eine Textdatei 
APPEND: Textdatei erweitern 
POSITION: Textdatei-Feldzeiger ändern 
CLOSE: Schließen einer Textdatei 
FLUSH: Puffer auf Textdatei übertragen 
FRE: String-Garbage-Collection 

EXEC: Textbefehlsdatei starten 


Binärdatei-Befehle 

BRUN: Maschinenprogramm starten 
BLOAD: (Binär)datei laden 

BSAVE: (Binär)datei speichern 


Allgemeiner Start-Befehl 
—: Ersatz für RUN, BRUN, EXEC 


Diejenigen, die unter DOS 3.3 program- 
miert haben, werden bemerken, daß die 
Befehle FP, INT, MON, NOMON, MAX- 
FILES und INIT fehlen. FP und INT mußten 
entfallen, weil das BASIC.SYSTEM nur für 
Applesoft und nicht für Integer-Basic ge- 
dacht ist. MON und NOMON fehlen wahr- 
scheinlich aus Platzgründen. Dasselbe gilt 
für den INIT-Befehl. MAXFILES ist nicht 
mehr möglich, weil mit dynamischen V/O- 
Puffern gearbeitet wird. 

Dafür gibt es einige völlig neue Befehle, 
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nämlich CAT, CREATE, FLUSH, PREFIX, 
STORE, RESTORE und FRE. Darüber hin- 
aus wurden die meisten gleichnamigen 
DOS-Befehle unter ProDOS funktionell 
erweitert und verbessert. 


2. PARAMETERTYPEN 


Die Parameter sind Zusätze zu den Be- 
fehlsnamen. Sie bestehen aus dem Para- 
meter-Buchstaben und dem Parameter- 
Wert und werden durch Kommas getrennt, 
wobei bei mehreren Befehlsparametern 
deren Reihenfolge beliebig ist, z.B. CATA- 
LOG, S6, D2 oder CATALOG, D2, S6. 

Es gibt zwei Ausnahmen: 

a) Namen werden durch Schrägstriche ge- 
trennt, z.B. GAT/DISK/DEMOS. 

b) Der Parameter-Wert für die Slot-Num- 
mer wird bei den PR#/IN#-Befehlen di- 
rekt an das Nummernkreuz angehängt, 
z.B. PR#1 


/n: Name (max. 64 Zeichen) 

s; Slot bei PR#s, IN#s (1-7) 

‚Ss: Slot (1-7) 

‚Dad: Drive (1-2) 

‚Aa: Anfangsadresse ($0000-$BFFF) 
‚Ee: Endadresse ($0000-$BFFF) 

‚LI: Länge ($0001-$C000) 

‚Bb: Byte-Offset ($000000-$FFFFFF) 
‚Rr: Recordnummer (0-16777215) 
‚Ff: Feldnummer (0-65535) 
‚Sz:Zeilennummer (0-63999) 

‚Tt: Dateityp (3-Buchstaben-Kürzel) 


Beispiele 
CATALOG/VOLUME/BRIEFE 
PR#3 

CAT, S3, D2 

BSAVE BILDER, A$2000, E$5FFF 
BSAVE BILDER, A$2000, L$4000 
BLOAD BILDER, A$4000, B$2000 
PRINT CHR$ (4) "READ FILE, R1000° 
PRINT CHR$ (4) "READ FILE, F3° 
LOAD PROGRAMM, 82000 
BLOAD/VOLUME, A$1000, TDIR 


3. DATEITYPEN 


Wie bereits im ersten Teil der Serie er- 
wähnt wurde, kann ein ProDOS-Datenträ- 
ger (Diskette, Festplatte) im Rahmen der 
maximalen Speicherkapazität von 32M be- 
liebig viele Dateien umfassen, wobel eine 
einzelne Datei bis zu 16M groß sein kann. 
Die ProDOS-Dateitypen lassen sich in arei 
Gruppen einteilen: 


SOS-Dateitypen: Dies waren die Dateity- 
pen des „Sophisticated Operating Sy- 
stem“ des Apple Ill, die inzwischen keine 


Rolle mehr spielen, da der Apple Ill nicht 
mehr produziert wird. 

Selbstdefinierte Dateitypen: Ein Änwen- 
derprogramm könnte sich seine eigenen 
Dateitypen mit den Typ-Nummern Im Be- 
reich $F1 bis $F8 definieren. Ein Bedarf 
hierfür besteht jedoch normalerweise 
nicht. 

Standard-Dateitypen: Dies sind die nor- 
malen oder allgemeinen Dateitypen, und 
zwar u.a.: 


SYS: Systemprogramm 


TXT: Textdatei 

BIN: Binärdatei 

BAS: Applesoft-Programm 
VAR: Applesoft-Variablendatei 
DIR: Subdirectory 


Der Dateityp besteht aus dem Parameter 
„I“ und dem jeweiligen 3-Buchstaben- 
Kürzel, z.B. TSYS, TTXT, TBIN, TBAS, 


" TVAR, TDIR usw. 


SYS-Dateien umfassen neben PRODOS 
und BASIC.SYSTEM weitere mögliche 
Systemprogramme, z.B. FILER, CON- 
VERT u.a. SYS-Dateien werden mit 
BLOAD SYSTEMDATEI, TSYS, A$2000 
geladen und mit 

— SYSTEMDATEI oder 

BRUN SYSTEMDATEI, A$2000, TSYS 
gestartet. 


TXT-Dateien sind normale ASCII-Datei- 
en. Falls diese mit den BASIC.SYSTEM- 
Befehlen OPEN, WRITE, READ, APPEND, 
POSITION, FLUSH und CLOSE bearbeitet 
werden, ist bei jedem ASCIl-Zeichen das 
Bit 7 auf O gesetzt, also z.B. $0D statt $8D 
für Return. Unter DOS 3.3 war es genau 
umgekehrt. Programmtechnisch können 
TXT-Dateien sequentielle oder Random- 
Dateien sein. 


BIN-Dateien sind Binärdateien aller Art, 
z.B. Maschinenprogramme, Hires-Bilder 
usw. Im Gegensatz zu DOS 3.3 steht die 
Startadresse und Länge einer BIN-Datei 
nicht im ersten Dateiblock, sondern im 
Catalog-Dateieintrag. Auf BIN-Dateien 
kann ohne den TBIN-Zusatz mit BSAVE, 
BLOAD und BRUN zugegriffen werden. 
Doch sind die BLOAD/BSAVE-Befehle im 
BASIC.SYSTEM dergestalt generalisiert 
worden, daß jede andere Dateiart mit dem 
entsprechenden Typzusatz geladen und 
gespeichert werden kann, z.B. 

BLOAD TEXTFILE, TTXT, A$1000 

BLOAD BASICPROGRAMM, TBAS, 
A$0801 
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Directories (Volume-Directory und Subdi- 
rectories) können ebenfalls mit BLOAD 
geladen, nicht jedoch (aus Sicher- 
heitsgründen) mit BSAVE zurückgespei- 
chert werden: 

BLOAD/VOLUMEDIR, A$2000, TDIR 
BLOAD/VOLUMEDIR/SUBDIR, A$1000, 
TDIR 


BAS-Dateien sind Applesoft-Programme, 
auf die mit den Befehlen SAVE, LOAD, 
RUN und CHAIN zugegriffen wird. Im Ge- 
gensatz zu DOS 3.3 steht die Länge des 
Applesoft-Programms nicht im ersten Da- 
teiblock, sondern im Catalog-Dateieintrag. 


VAR-Dateien umfassen die Namen und 
Werte aller Variablen eines Applesoft-Pro- 
gramms und werden mit STORE/VARIA- 
BLENDATEI gespeichert und mit RE- 
STORE/VARIABLENDATEI geladen. 


DIR-Dateien sind Inhaltsverzeichnisse, 
und zwar entweder das Hauptinhaltsver- 
zeichnis (Volume-Directory) oder eines 
der beliebig vielen Unterinhaltsverzeich- 
nisse (Subdirectories). 


4. CAT, CATALOG, PREFIX, 
CREATE 


CAT/VOLUMEF/DIR, Ss, Dad 
CATALOG/VOLUME/DIR, Ss, Dd 
PREFIX/VOLUME/DIR, Ss, Dd 
CREATE/VOLUME/DIR/;Tt, Ss, Dad 


Nach diesem relativ trockenen, aber not- 
wendigen theoretischen Gesamtüberblick 
können wir uns nunmehr den einzelnen 
Befehlen im Detail zuwenden. Nachdem 
wir die USERS.DISK (oder eine andere 
ungeschützte ProDOS-Diskette) mit 
PR#6 o.ä. gebootet und dann ein ggf. 
vorhandenes Menu verlassen haben, be- 
finden wir uns im Nicht-RUN-Modus, so 
daß wir jetzt über die Tastatur Befehle 
eingeben können. Mit 

CAT 

oder mit 

CATALOG 

können wir uns nunmehr den Catalog oder 
das Directory (Inhaltsverzeichnis) der Dis- 
kette in 40 Zeichen/Zeile (CAT) oder in 80 
Z/Z ansehen. Das Listing „PRODOS.DI- 
RECTORY"“ zeigt einen solchen ProDOS- 
Catalog in 80 Z/Z. Betrachten wir hier den 
ersten Dateieintrag „PRODOS: 


Sternchen: Ein vorangestelltes Sternchen 


zeigt an, daß die Datei „PRODOS” 
schreibgeschützt ist. Fehlte das Stern- 
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chen, dann könnte die Datei gelöscht 
werden. 

Dateiname: Der Name „PRODOS” be- 
steht hier aus 6 Großbuchstaben. Insge- 
samt kann eine Dateiname bis zu 15 Zei- 
chen umfassen, und zwar nur Großbuch- 
staben, Ziffern und Punkte, aber keine 
Leerzeichen, Ctrl-Buchstaben, Kleinbuch- 
staben und sonstigen Sonderzeichen. Das 
erste Zeichen des Dateinamens muß ein 
Großbuchstabe sein. Beispiele: 
SPIELPROGRAMM10 (mit Ziffern) 
BASIC.SYSTEM (mit Punkt) 

MEIN PROGRAMM (falsch, da Leertaste) 
BASIC-PROGRAMM (falsch, da Binde- 
strich) 
Dateityp: 
Bl 
Blockanzahl: Anzahl der von der Datei 
belegten Blocks, hier „31. 

Datum der Modifikation: In der Form TT- 
MON-JJ, hier 1-JAN-84. 

Uhrzeit der Modifikation: In der Form 
HH:MM. 

Datum der Anlage: Tag, an dem die Datei 
erstmals angelegt („kreiert“) wurde, hier 
„<NO DATE>*, 

Uhrzeit der Anlage: Diese fehlt hier. 
Dateilänge: Anzahl der Bytes der Datei, 
hier „15360. ENDFILE = End of File 
steht sowohl für die Gesamtanzahl der 
Bytes wie auch für die absolute Position 
des letzten Bytes der Datei, d.h. „PRO- 
DOS“ umfaßt 15360 Bytes, und das letzte 
Byte dieser Datei ist das 15359ste Byte, da 
die Zählung mit Null beginnt. 

Zusatzinfo: Die Zusatzinformation wird im 
ProDOS-Catalog als SUBTYPE bezeich- 
net, während das technische Manual von 
AUXTYPE (Auxiliary Type) spricht. Bei 
BIN-Dateien steht hier die Startadresse. 
Bei SYS-Dateien usw. bleibt das Feld leer. 


3-Buchstaben-Kürzel, hier 


Unter ProDOS gibt es zwei Arten von In- 
haltsverzeichnisses: 

Volume-Directory: Das Volume-Directo- 
ry Ist das Hauptinhaltsverzeichnis. Es be- 
legt auf der Diskette die Blocks 2-5 und 
kann insgesamt 51 Dateieinträge aufneh- 
men (12 im ersten Block und je 13 in den 
drei weiteren Blocks = 12 +3x*13=51). 
Für 140K-Disketten ist dies oft ausrei- 
chend. 

Subdirectory: Neben dem einzigen Vol- 
ume-Directory können mit dem CREÄTE- 
Befehl beliebig viele Subdirectories ange- 
legt werden, wobei jedes Subdirectory im 
übrigen beliebig viele Dateieinträge um- 
fassen kann. Ein Subdirectory ist in dem 
Volume-Directory durch den Dateityp 
„DIR“ gekennzeichnet. Für Subdirecto- 
ries gibt es keine festen Blocks auf der 
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Diskette, d.h. sie können sich überall dort 
befinden, wo auf der Diskette gerade Platz 
ist. Übrigens kann auch das Subdirectory 
selbst wieder Sub-Subdirectories enthal- 
ten (hierarchische Catalog-Struktur), doch 
sollte man diese möglichst vermeiden, 
denn je mehr (verschachtelte) Subdirecto- 
ries, desto länger ist der Diskettenzugriff. 


Unter ProDOS lassen sich drei Arten von 
Namen unterscheiden: 


Volume-Name: Dies ist der beim Forma- 
tieren festgelegte Name der Diskette 
selbst, wie er aus dem Volume-Directory 
ersichtlich ist (bei unserem Listing 
SllEHEN): 

Subdirectory-Name: Dies ist der Name 
eines von beliebig vielen Subdirectories. 
File-Name: Dies ist der eigentliche Name 
der Datei. 


Die Summe aus „/" + Volume-Name + 
„7“ + Subdirectory-Name + „/“ + File- 
Name bildet den sog. Pfadnamen (Path- 
name) oder vollständigen Namen, der in- 
klusive Schrägstriche maximal 64 Zeichen 
umfassen kann. Die Namensbestandteile 
müssen durch Schrägstriche abgegrenzt 
werden, wobei der Schrägstrich nach dem 
letzten Bestandteil fakultativ ist, also 
CAT/STIEHL/DIR/ 

oder 

CAT/STIEHL/DIR 


Mit dem PREFIX-Befehl kann man das 
Präfix, d.h. den Dateinamenvorspann fest- 
legen. Danach genügt wie bei DOS 3.3 der 
eigentliche Dateiname (ohne Schrägstrich 
als Zusatz zu den Befehlen, also statt z.B. 
LOAD/VOL/SUBDIR/PROGRAMM.XYZ 
zunächst 

PREFIX/VOL/SUBDIR 

und dann nur noch 

LOAD PROGRAMM.XYZ 


Beispiele: 


. NEW 

. 10 HOME 

. CREATE/STIEHL/DIR, TDIR 
. PREFIX/STIEHL/DIR 

. SAVE DEMO 

. CATALOG 

. PREFIX/STIEHL 

. CATALOG 

mel 


oOo@O 19 O1 P@ODN — 


1. Mit NEW löschen wird zunächst ein 
möglicherweise noch im Speicher befindli- 
ches Applesoft-Programm. 
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2. Mit 10 HOME legen wir jetzt ein Test- 
programm an. 

3. Mit CREATE/STIEHL/DIR, TDIR erstel- 
len wir jetzt auf der Diskette mit dem Vol- 
ume-Namen STIEHL ein Subdirectory mit 
dem Namen DIR. 

4. Mit PREFIX/STIEHL/DIR legen wir das 
Präfix „/STIEHL/DIR/” fest. 

5. Der Befehl SAVE DEMO speichert da- 
mit das Testprogramm genauso im Subdi- 
rectory DIR, als hätten wir SAVE/STIEHL/ 
DIR/DEMO gesagt. 

6. Mit CATALOG können wir automatisch 
das Subdirectory DIR ansehen. 

7. Mit PREFIX/STIEHL können wir wieder 
zum Volume-Directory zurückschalten. 

8. Der CATALOG-Befehl zeigt damit wie- 
der das Volume-Directory an. 

9. Der PREFIX-Befehl zeigt jetzt (wieder) 
STEH ZanN. 


Der PREFIX-Befehl bietet folgende Be- 
sonderheiten: 


PREFIX/VOLUME/SUÜB legt das neue Prä- 
fix fest. 

PREFIX, S6, DT legt das Volume-Directory 
der Diskette in Slot 6, Drive 1 als neues 
Präfix fest. 

PREFIX oder 10 PRINT CHR$ (4) „PRE- 
FIX“: INPUT P$ zeigt im Nicht-RUN-Mo- 
dus das momentane Präfix an oder weist 
im RUN-Modus bei einem unmittelbar fol- 
genden INPUT der String-Variablen — der 
Name der Variablen ist beliebig — das mo- 
mentane Präfix zu. 

PREFIX/ entfernt das Präfix insgesamt. 
Danach verhält sich das BASIC.SYSTEM 
wie DOS 3.3, d.h. es können jetzt mit den 
Parametern Ss und Dad die jeweils aktiven 
Slots und Drives (als Default-Werte) be- 
stimmt werden. 


Beispiel: 


"PREEIXNSS.D] 
.CAT, D2 

CAT 

AEREIMIRZ 
.CAT, D2 

. CAT 


ON RWD-— 


1. Zunächst wird der Volume-Name von 
S6, D1 als Präfix festgelegt. 

2. CAT, D2 zeigt den Catalog der Diskette 
in Drive 2 an. 

3, CAT ohne Parameter zeigt jedoch jetzt 
wieder Drive 1 an, da das alte Präfix noch 
gültig ist (Dies weicht von DOS 3.3 ab). 

4. PREFIX/ entfernt jedes Präfix. 

5. CAT, D2 zeigt Catalog von Drive 2 an. 
6. CAT zeigt jetzt erneut Drive 2 an (Dies 
entspricht jetzt DOÖS 3.3). 
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PRODOS.DIRECTORY 
/STIEHL 
NAME 
1 18 
* * 
*PRODOS Sys 
»BASIC.SYSTEM SYS 
#FILER Sys 
»CONVERT Sys 
*CLEAR BIN 
*LOE BIN 
*LCREAD BIN 
*PEEKER BIN 
#BLOCKREADER BIN 
*BLOCKTRACER BIN 
*STARTUP BAS 
*MACROS BAS 
#RAMKARTE TAT. 
*PRODOS. EDITOR BIN 
*PRODOS.,DATUM BIN 
*FUSION BET 
#PRODOS.INIT8S® BIN 
*BLOCK28ßPATCH BIN 
*RAMSUCHER BIN 
*BLOCKTRACERL BIN 
»QUICKCOPY BIN 
*PRODOS,COPYOBJ BIN 
»PRODOS.COPYA  BAS 
*FORMAT.LC.START BAS 
«FORMAT .LC BIN 
EINTRAG. ANALYSE BAS 
CAT.SAVER BAS 
CAT. ARRAY BAS 
EINTRAG.SUCHER BAS 
CAT.SAVE DAT, 


BLOCKS FREE: 


CAT.ARRAY 


18 CGOSUB Ehdded: END 

REM CAT. ARRAY 
PRINT CHR$ (4);"PREFIX": INPUT P$ 
DIM D$(51):Dl = $:D2 = 51 

PRINT CHR$ (4); "OPEN"; P$;", TDIR" 
PRINT CHR$ (4); "READ";P$ 

INPUT D1$: 
DI =DI +1: 


sönnd 
SHBL9 
Ad 
St 
Shan 
Shut 
spdsh 
62978 
Shd8ß 
SPH9B 
SH1BB 
SHL1B 
6Ö12H 
64139 
SH1AG 
SH15# 
Shı6h 


HOME : 


ERINT: 


NEXT 
PRINT : 
RETURN 


CAT.SAVER 


188 HOME : 


FA 


m 


JH He GO Urt Hr Hüte bh 


BLOCKS 


INPUT D2$: 


REM CAT.SAVER 


TYPE BLOCKS MODIFTED 
12545678981254567898123456789812345678981234567 


öl 
* 
1-JAN-84 
15-NOV-83 
<NO DATE> 
1-NOV-83 
<NO DATE> 
<NO DATE> 
<ND DATE> 
<NO DATE> 
<NO DATE> 
<NO DATE> 
23-DEC-84 
23-DEC-84 
21-JUN-84 
1-AUG-84 
21-JUN-84 
21-JUN-84 
<NO DATE> 
<NO DATE> 
21-JUN-84 
2-SEP-84 
<NO DATE> 
<NO DATE> 
<NO DATE> 
13-JAN-85 
<NO DATE> 
13-JAN-85 
<NO DATE> 
<NO DATE> 
<NO DATE> 
<NO DATE> 


USED: 227 


INPUT D3$ 
IF D1 > D2 THEN 69088 
INPUT D$(D1): IF D$(D1) < > "" THEN 6BB6hd 
INPUT D3$: PRINT CHR$ (4), "CLOSE" 
PRINT "Diskette ";D1$: REM Prefix 
PRINT LEFT$ (D2$,39): REM 
PRINT :DoDL=Dl - 1 

FOR& = 1 T0D1 

IF MID$ (D$(X),18,3) = '"BAS’" THEN 


PRINT LEFT$ (D3$,39): REM 


31® PRINT CHR$ (4) ;'"PREFIX": INPUT P$ 


128 DIM D$(51):D1l = B:D2 = 51 


138 PRINT CHR$ (4); "OPEN"; P$;",TDIR" 


148 PRINT CHR$ (4); "READ";,P$ 
INPUT D2$: INPUT D3$ 
169. DI =D] 27: 


150 -INFUT DIS: 


266 PRINT D1$ 
218 PRINT : 


IF D1 > D2 THEN 189 
178 INPUT D$(D1): IF D$(D1) < > "" THEN 169 
188 INPUT D3$: PRINT CHR$ (4) ;"CLOSE";P$ 
1968 PRINT CHR$ (4);"OPEN CAT.SAVE": PRINT CHR$ (4); "WRITE CAT.SAVE" 


PRINT D2$ 
228 PRINT :DI=Dl -]1 


238 FOR X = 1 TO Dl 


2AB PRINT D$(X} 


250 NEXT 
268 PRINT : 


PRINT D3$ 


278 PRINT CHR$ (4); "CLOSE" 
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* 


am 


a 02 


;P$ 


„sm m ma 


d:80 
A: 
9:09 


10 


:88 
:d8 


CREATED ENDFILE SUBTYPE 

89912345678901234567899123456789 
48 59 67 73 

* * * * 

<NO DATE> 15366 

<NO DATE> 18249 

<NO DATE> 25608 

<NO DATE> 2H48l 

<NO DATE> 184 A=$0399 
<NO DATE> 111 A=$6299 
<NO DATE> 134 A=$d308 
<NO DATE> 448 A=$0803 
<NO DATE> 312 A=$0803 
<NO DATE> 149 A=$0309 
<NO DATE> 176 
23-DEC-84 9:09 882 

<NO DATE> 399 R= 4996 
<NO DATE> 5707 A=$3FA5 
<NO DATE> 267 A=$60ßR 
<NO DATE> 326 R= 4096 
<NO DATE> aB96 A=$8B00 
<NO DATE> 121 A=$B306 
<NO DATE> 222 A=$B2FB 
2-SEP-84 8:80 147 A=$0399 
<NO DATE> 1881 A=$ß8AE 
<NO DATE> 1502 A=$ßBB8 
<NO DATE> 650 
13-JAN-85 8:08 48] 

<NO DATE> 3232 A=$80BB 
<NO DATE> ee 

<NO DATE> 345 

<NO DATE> 385 

<NO DATE> 333 

<NO DATE> 2571 R= Ö 

TOTAL BLOCKS: 286 


Kopfzeile 


PRINT LEFT$ (D$(X),39) 


Fußzeile 
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Default-Werte (Ersatzwerte) 


a) DOS-3.3-Emulation-Default: Wenn wir 
mit PREFIX/ das Präfix ganz entfernen, so 
„weiß“ ProDOS nichts mehr vom Präfix 
und verhält sich hinsichtlich der Slot- 
Drive-Defaulti-Werte wie DOS 3.3: Der zu- 
letzt angesprochene Slot/Drive bleibt so- 
lange aktiv, bis explizit ein neuer Slot/ 
Drive angegeben wird. 

b) ProDOS-Default: Das mit PREFIX/VOL- 
UME.NAME/SUBDIR.NAME definierte 
Default-Präfix bleibt solange erhalten, bis 
es explizit neu definiert wird. Slot- und 
Drive-Parameter bei BASIC.SYSTEM-Be- 
fehlen ändern nicht das Präfix (außer na- 
türlich durch den Präfix-Befehl PREFIX, 
Ss, Dd selbst). 


5. ERLÄUTERUNG ZU DEN 
PROGRAMMEN 


Die Beispielprogramme gehen etwas über 
den bislang vermittelten ProDOS-Stoff 
hinaus und sollten deshalb hier nur kur- 
sorisch erklärt werden. 


CAT.ARRAY 


CAT.ARRAY, das als Unterroutine gedacht 
ist, gibt Ihnen die Möglichkeit, das gesam- 
te Directory, wie man es beim CATALOG- 
Befehl sieht, in einem String-ÄArray abzule- 
gen, auf den Sie dann gezielt zugreifen 
können. So sind beispielsweise die Zeilen 
60100, 60130 und 60150 dergestalt modi- 
fiziert, daß nur eine Catalog-Anzeige in 40 
Z/Z erfolgt. Ferner werden durch Zeile 
60130 selektiv nur die BAS-Dateien ange- 
zeigt. In dem Listing PRODOS.DIRECTO- 
RY ist eine „Zählzeile 12345..." eingefügt, 
die es Ihnen leicht ermöglicht, auf die je- 
weiligen Positionen der einzelnen Datei- 
eintrag-Strings D$(X) mit MID$ zuzugrei- 
fen. Falls Sie das Programm auf umfang- 
reiche Subdirectories anwenden wollen, 
so erhöhen Sie bitte die DIM-Anweisung 
in Zeile 60020. 


CAT.SAVER 


CAT.SAVER entspricht CAT.ARRAY, doch 
wird der Catalog nunmehr nicht am Bild- 
schirm angezeigt, sondern auf der Disket- 
te unter dem TXT-File „CAT.SAVE” ge- 
speichert. 


EINTRAG.SUCHER 


Der EINTRAG.SUCHER sucht einen per 
INPUT eingegebenen, beliebigen Datei- 
eintrag aus einem nicht inhaltlich bekann- 
ten Directory heraus und vermeidet damit 
die Programmunterbrechung für den Fall, 
daß der gesuchte Name nicht existiert. 
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EINT 


198 

11® 
S1A99 
61919 
61929 
61939 
61P49 
E1BSP 
61B6P 


61978 
61089 
81899 
6119 
61119 


EINT 


199 
119 
128 
13% 
14® 
159 
16% 
179 
189 
198 
208 
210 
228 
238 
240 
250 
268 
270 
280 
298 
309 


319 
328 


336 
349 
350 
368 
376 
380 


399 
ad 


41 


428 


439 
AAN 
459 


A659 
AaTo 


A86 
499 
599 


51® 
520 
530 
540 
550 
569 
579 
58% 





RAG.SUCHER 


INPUT "Dateieintrag: ";S$ 

GOSUB 618ß9: END 

REM EINTRAG. SUCHER 

PRINT CHR$ (4); "PREFIX": INPUT P$ 

PRINT CHR$ (4); "OPEN"; P$;",TDIR" 

PRINT CHR$ (4); "READ";P$ 

Er—LEN NSS] 

INPUT D$: INPUT D$: INPUT D$: REM Ignorieren! 


dos En 


F = 6: INPUT D$: IF MID$ (D$,2,L) = S$ AND MID$ (D$,L + 2,1) =" " 


THEN F = 1: GOTO 61ß8ß9: REM F=Such-Flag 
IF D$ < > "" THEN 6106 

PRINT CHR$ (4); "CLOSE";P$ 

IF F= 1 THEN PRINT P$;S$;" da!": 
PRINT P$;S$;" fehlt!" 

RETURN 


GOTO 61119 


RAG.ANALYSE 


REM EINTRAG. ANALYSE 

REM U.Stiehl/1985 

PRINT CHR$ (4) ;'"PR#3" 

PRINT CHR$ (4); "CATALOG!" 

INFUT "Dateieintrag: ";S$: Ir S$ = "" THEN 149 
HOME : GOSUB 53% 

REM 768 = Byte 

REM CALL 769 
REM CALL 776 
REM CALL 783 High Nibole 

DATA 9.173.0.3.32.218 253,96.173,8 

DATA 3,32,227,253,96,173,9,3,74,74 

DATA 74,74,32,227,253,96 

RESTORE 

FOR X = 768 TO 793: READ Y: POKE X,Y: NEXT 

REM Dateieintrag per Binärfile suchen 

A = 8192:B = B:L = 512: REM Address, Byte, Length 
0 = 4 + 39: REM Offset für nächsten Eintrag 

PRINT CHR$ (ANUELOAD"T: FE: TDIR ANA N ZEN SB "Le 
xX=]1 


Hexbyte 
Low Nibble 


| 


ON PEEK (A+0 +X) <> ASC ( MID$ (S$,X,1)) GOTO 318:X= X +1: 


ON X < = LL GOTO 39: GOTO 349 
0 =0 +39: IF 0 < 511 THEN 299 


IF PEEK (A+2) <> BOR PERKK (A+3) <> dB THENB=BHL:0 = 4: 


GOTO 289: REM Nächster Block 
PRINT "Nicht gefunden!": END 
PRINT "Gefunden!": 
REM Komponenten des Dateieintrags 
PRINT : PRINT "Speichertyp: $":: 
REM High Nibble 


IF F= 6 THEN PRINT "Jedoch gelöschte Datei!" 


+ 15): 


* GALLE 
EGAL 


: CALL 


: CALL 


POKE 768, PEEK (A + 0 + ®): CALL 783: 


769 
769: 


769: 


og. 


PRINT : PRINT "Namenslänge: $’”";: POKE 768, PEEK (A + 0 + Bd): CALL 776: 
REM Low Nibble 

PRINT : PRINT "Dateiname: ";: FRRX= (A+0 +1) TO (A+O 
PRINT " $";: POKE 768, PEEK (X): CALL 769: NEXT 

PRINT : PRINT "Dateityp: $";: POKE 768, PEEK (A +0 + 16} 
PRINT : PRINT "Hauptzeiger: $";: POKE 768, PEEK (A +0 + 18) 
FOKE 768, FEbrR (A#+0O + 17): CALE 769: PRINT ! (SEHE NV: 
PRINT : PRINT "Blockanzahl: $";: POKE 768, PEEK (A + 0 + 2$) 
POKE 768, PEEK (A + 0 + 19): CALL 769: PRINT " tSEHLL)" 
PRINT : PRINT "Dateilänge: %";: POKE 768, FPEEK (A +0 + 23) 
POKE 768, PEEK (A + O0 + 22): CALL 769: POKE 768, PEEK (A + 0 


CALL 769: PRINT " ($HHMMLL)"; 


PRINT : PRINT "Create-Dat: $":: POKE 768, PEEK (A +0 + 24}: 
PRINT " $";: POKE 768, PEEK (A + O0 + 25): CALL 769 

PRINT : PRINT "Create-Uhr: $";: POKE 768, PEEK (A + 0 + 26): 
PRINT 507 PORE 768, EEBR (A EV 27, cALE 769 

PRINT PRINT “Version-Ne. $%: > FORKE 768, PEEKR (A+ 0 28): 
PRENT 2750. SPORE 768, FERR (A 50:5 23). SALL 759 

FRINT : PRINT "Zugriff: $"':: POKE 768, PEEK (A + 0 + 3ß) 
FRINT : PRINT "Zusatzinfo: S":: PORE 768, FEER (A+ 06 #232] 
FÜKE 768, FREK (A HF Or 81): -CALL 7692 PRINT" ($HRLL)"; 
PRINT : PRINT "Mod-Datum: $";: POKE 768, PEEK (A + 0 + 33) 
FRINT 96022 SPORE 768, PEEK [A 4 9 2.54): OALL 769 

PRINT : PRINT '"Mod-Uhr: G’= 27 PORE 768, FEER (A + 55: 
PRINT " $";: POKE 768, PEEK {A + 0 + 36): CALL 769 

PRINT : PRINT "Kopfzeiger: %";: POKE 768, PEEK (A +0 + 38): 


FPORE 768, FERKR (A 20 + 57): CALL. 769: PRINT! 
END 

REM Dateieintrag per Textfile suchen 

PRINT CHR$ (4); "PREFIX'": INPUT P$ 

PRINF CHR& (4): "OPEN"; P&:" TDIR“ 

PRINT CHR$ (4); '"'"READ";P$ 

CE — LEN (SE) 

INPUT D$: INPUT K$: INPUT D$: REM Ignorieren! 


($HHALL)": 


za) 


CALL 


CALL 


CALL 


SEGALL 
a ALL 


: CALL 


CALL 


CALL 


F= ß: INPUT D$: IF MID$ (D$,2,LL) = S$ AND MID$ (D$,.LL + 2,1) =" 


THEN F = 1: GOTO 688: REM F=Such-Flag 


769: 


T6S. 


eg: 


789 
109: 


769. 


169: 


769: 








EINTRAG.ANALYSE 
Dieses umfangreiche, aber nützliche Pro- con eier 
gramm erzeugt einen Hex-Dump aller Be- 610 PRINT PS;S$ 


standteile eine Dateieintrages, und zwar 
auch solcher Bestandteile, die normaler- 
weise nicht aus dem Catalog ersichtlich 
sind. Ferner können auch Dateieinträge 
von gelöschten Dateien angezeigt wer- 
den. Das Programm setzt theoretische 
Kenntnisse der Directory-Struktur voraus 
(s. „ProDOS für Aufsteiger”, Bd. 1, S. 
120ff). Ferner macht das Programm von 
der in einer späteren Folge erläuterten 
Möglichkeit Gebrauch, eine Datei (hier das 
Directory) mit dem BLOAD-B-Parameter 
schubweise einzulesen. 


NAME 


Speichertyp: 
Namenslänge: 
Dateiname: 
Dateityp: 
Hauptzeiger: 
Blockanzahl: 
Dateilänge: 
Create-Dat: 
Create-Uhr: 
Version-Nr: 
ZUErLIT- 
Zusatzinfo: 
Mod-Datun: 
Mod-Uhr: 
Kopfzeiger: 


Trace-Bug 


Infolge diverser Pseudo-Trace-Fehler ge- 
rät das BASIC.SYSTEM oft ungewollt in 
den echten Trace-Modus (#-Zeilen- 
nummernanzeige während des laufenden 
Applesoft-Programms). Da zur Zeit noch 
verschiedene „Vorversionen“ des BASIC 
‚SYSTEMs in Umlauf gesetzt werden, ist 
es für einen definitiven Patch noch zu früh. 
Beispiele: 


Bug 


40 NEXT 


PRODOS.READER 


Simulierter CP/M-TYPE-Befehl für ProDOS 
von U,Stiehl, 25.92.85 


Liest ProDOS-Dateien beliebiger Art und Größe 
schubweise in den RAM-Speicher $1ß9%-$8FFF 

und erzeugt einen ASCII-Dump am Bildschirm. 
Speziell für sequentielle Textfiles gedacht, 
Ctrl-Zeichen (außer Return) werden invers 
dargestellt. Bei IIc/IlIe auch mit 8®-Zeichenkarte 
möglich, Der Quellcode des Maschinenprogramnms 
befindet sich auf der Peeker-Sammeldisk. 


198 REM PRODOS.READER von U.Stiehl/24.82.85 

119DATA 76. 7,5,0.16.0. 144. 173.33 

128 DATA 141,47,3,173,4,3,141,48,3,76 

138 DATA 30,3,238,47,3.298,3,238,48,5 

14ß DATA 24,173,5,3,237,47,3,173,6,3 

150 DATA 237,48,3,176,1,96,173,255,255,9 

16% DATA 128,281,255,249,223,281,141,2498,15,2®1 

178 DATA 169,176,11,1@5,64,141,99,3,32,128 

180 DATA 254,173,99,3,32,237,253,32,132,254 

196 DATA 173,0,192,16,193,44,16,192,173,9 

260 DATA 192,16,251,44,16,192,76,22,3 

210 RESTORE : FOR X = 768 TO 866: READ Y: POKE X,Y: NEXT 

226 TEXT : HOME : INVERSE : PRINT "PRODOS, READER": 
NORMAL : PRINT : PRINT : PRINT "START J/N ";: GET 
X$: PRINT X$: ON X$ = "J" OR X$ = "5" GOTO 239: 
ON X$ < > "N" AND X$ < > "n" GOTO 220: HOME : END 


46 


628 IF F= 1 THEN PRINT : 
638 PRINT ! 


EINTRAG, ANALYSE BAS 6 





10 FORX = 1 TO 60: REM xx*PR#S- 


20 IFX = 20 THEN PR#0: PRINT 
„Trace-Anfang“ 

30 IFX = 40 THE POKE 242, 0: PRINT 
„Trace-Ende“ 


PRINT CHR$ (4) ;"CLOSE";P$ 


PRINT K$: PRINT D$ 
RETURN 


Beispiel: Programm "EINTRAG.ANALYSE" auf Datei "EINTRAG. ANALYSE" 
selbst angewandt (hier enthalten in Subdirectory "DIR")} 


/STIEHL/DIR/EINTRAG. ANALYSE 


TYPE BLOCKS MODIFIED 


13-JAN-85 9:P® 


ENDFILE SUBTYPE 
2112 


CREATED 
13-JAN-85 0:08 


82 
$F 
$45 $49 $4E $54 $52 $a1 $47 $2E $4l $AE $al $AC $59 $53 $45 
SFC 

$80D5 ($HHLL) 

$ößd6 ($HHLL) 

$P00849 ($HHMMLL‘) 

$2D $AA 
BB $B9 
$D0 $P9 
$E3 
$B801 
$2D $AA 
$0B $00 
$B8D3 


{$HHLL) 


($HHLL) 


10 FORX = 1 TO 60: REM x#*PR#S- 
FLASH-Bug 

20. IE X = 20 THEN FLASEE PRINT 
„Trace-Anfang“ 

30 IFX = 40 THEN NORMAL: PRINT 
„Trace-Ende“ 

40 NEXT 


PRINF 7 PRINT CHRS (A) U PREFTAN: INPUT PE: PRINT 
CHR$ (4);"CAT";P$: PRINT : INPUT "DATEI:":S$: IF S$ 
= "1 THEN 229 

REM Dateieintrag suchen 

PRINT CHR$ (4); "OPEN"; P$;",TDIR": PRINT CHR$ 

(4); "READ";P$:L = LEN (5S$) 

INPUT D$: INPUT D$: INPUT D$: REM Ignorieren! 

F= 6: INPUT D$: IF MID$ (D$,2,L} = S$ AND MID$ 
(D$,L + 2,1) =" " THEN F = 1: GOTO 298: 

REM F=Such-Flag 

IF D$ < > "" THEN 279 

PRINT CHR$ (4) ;"CLOSE";P$ 

IF F= $ THEN PRINT P$;5S$;" FEHLT!": 
GOTO 229 

REM Lesepuffer $1092-$9009 

T$ = "T" + MID$ (D$,18,3):LL = VAL ( MID$ 
(D$,66,6)) 

HOME : PRINT CHR$ (4); "FRE": POKE 773,8: POKE 
774,144: REM $9d0% 

IF LL < 32768 THEN R= LL: GOSUB 380:B = B:L = R: 
GOSUB 399: GOTO 498 

B B:L = 32768: GOSUB 39 

B B+L: IFB + L < LL THEN GOSUB 399: GOTO 369 
R LL - B: GOSUB 388:L = R: GOSUB 390: GOTO Add 
POKE 773,R - INT (R / 256) &» 256: POKE 774, INT ({R 
{ 256) + 16: RETURN 

FRINT EHRS (AY"BLOAD"SPE:SS:" Ps u 21818900: 

Bu BET SE UCAbL 7658 RRLURN 

PRINT : GET X$: PRINT CHR$ (4): GOTO 228 


GET X$: 
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Apple DOS 3.3 

von Ulrich Stiehl 

2. Aufl. 1984, 203 S., kart, 
DM 28,- 


Dies ist die erste deutschspra- 
chige Darstellung des Disket- 
tenbetriebssystems DOS 3.3 
für den Appie II/II Plus/lte, die 
sich sowohl an Applesoft- als 
auch an Assembler-Program- 
mierer wendet. Sinngemäß ist 
das Buch zweigeteilt: 

Der erste Teil behandelt aus- 
führlich die dem Applesoft-Pro- 
grammierer zur Verfügung ste- 
henden DOS-Befehle, wobei 
die Textfiles wegen ihrer gro- 
Ben Bedeutung und der ver- 
gleichsweise komplizierten 
Handhabung besonders darge- 
stellt werden. Viele Textifile- 
Tricks werden hier zum ersten- 
mal geschildert. 

Aber auch im zweiten Teil fin- 
det der reine Applesoft-Pro- 
grammierer insbesondere in 
dem Kapitel „Vermischte Tips, 
Tricks und Patches“ zahlreiche 
Anregungen. Im übrigen ist der 
zweite Teil für Assembler-Pro- 
grammierer gedacht. Neben ei- 
ner detaillierten Beschreibung 
der DOS-Interna enthält dieser 
Teil elf vollständige RWTS-An- 
wenderprogramme - z.B. 
CPM-Refiner, DOS-lose Da- 
tendisk, TSL-Maker, File- 
Reader, Pseudo-Disk-Driver 
und Fastbrun-Routine —, die 
Techniken enthüllen, die bis- 
lang noch niemals publiziert 
worden sind. Dieses DOS- 
Buch ist deshalb der unent- 
behrliche Begleiter für jeden 
Apple-Programmierer. 


Apple li 

Basic Handbuch 
von Douglas Hergert 
304 Seiten, 116 Abb. 
DM 32,- 


Das Buch ist als Nachschlage- 
werk konzipiert, daß seinen 
Platz neben jedem APPLE Il, 
II+ und Ile haben sollte. Es 
richtet sich an Anfänger und 
fortgeschrittene Program- 
mierer. 






Aus der Praxis heraus präsen- 
tiert der Autor Tips und Vor- 
schläge, die das Programmie- 
ren leichter und zugleich effi- 
zienter machen. Alle Applesoft- 
und Integer-BASIC-Begriffe 
sind alphabetisch aufgelistet 
und werden eingehend erklärt. 


Dazu werden alle DOS-Befehle 
(neben vielen Begriffen der 
Computerterminologie) vorge- 
stellt. 

Beispielprogramme zeigen 
dem Nutzer, wie jeder Befehl 
funktioniert und helfen, die rich- 
tige Anwendung zu üben. Un- 
ter anderem lernt der Leser 
den besten Weg, um FOR/ 
NEXT-Schleifen und IF/THEN- 
Entscheidungen für seine 
Zwecke einzusetzen. 

Durch die präzise und leicht 
verständliche Sprache des Au- 
tors werden auch schwierige 
Befehle einfach in der Anwen- 
dung. 


Apple Maschinen- 
sprache 


von Don und Kurt Inman 
1984, 208 S., zahlr. Abb. und 
Tabellen, DM 49,-— 


APPLE 


MASCHINEN 
SPRACHE 


DON INMAN - KURT INMLAIN 





Dieses Buch ist wahrscheinlich 
die beste Einführung in die 
6502-Programmierung für den- 
jenigen Assembler-Anfänger, 
der zuvor noch nie ein Maschi- 
nenprogramm geschrieben 

at. 


Aus dem Inhalt: 

Applesoft II BASIC - kurzge- 
taßt — Alles über Zeichen - Al- 
les über Speicher -— Alles über 
Maschinenbefehle — Maschi- 
nenprogramme mit BASIC ein- 
geben —- Graphik — Text- Ton-— 
Arithmetik -— Was tun mit den 
Maschinenprogrammen 


Apple Il 
leicht gemacht 
von Joseph Kascmer 


1984, 185 S., zahlr, Abb., kart., 
DM 28, 


Dies ist ein Buch, wie es sich 
jeder Apple-Anfänger nur wün- 
schen kann: Schrittweise, 
leichtverständliche Anleitung 
zum Umgang mit dem Apple 
mit einigen durchsichtigen, un- 
komplizierten Beispielen in Ap- 
plesoft, die ihn nicht Abschrek- 
ken, sondern ermutigen sollen, 
sich mit dem Gerät näher ver- 
traut zu machen. Damit ist „Ap- 
ple Il leicht gemacht“ das idea- 
le Einsteigerbuch für den rei- 
nen Anwender, der nicht nur 
„auf den Knopf drücken“, son- 
dern zumindest einige Details 
aus der Black Box namens Ap- 
ple erfahren will. 








Aus dem Inhalt: 

Kontrolle des Geräts - Schrei- 
ben und Zeichnen auf dem 
Bildschirm - Geheimnisvolle 
Abläufe: Programme — Ver- 
schiedene Eingriffsmöglichkei- 
ten - Mobile Speicher: Disket- 
ten - Kontrollmöglichkeiten — 
Das Innenleben 


Apple Assembler 
Tips und Tricks 


von Ulrich Stiehl 
1984, 226 S., 3 Abb., kart., 
DM 34,— 


„Apple Assembler“ wendet 
sich an alle, die bereits Anfän- 
gerkenntnisse der 6502-Pro- 
grammierung haben -z. B. 
aufgrund des Buches „Apple 
Maschinensprache“ — und nun- 
mehr ein Nachschlagewerk für 
ihren Apple Il Plus/tte/llc su- 
chen, in dem alle wichtigen 
ROM-Routinen sowie eine 
Vielzahl sonstiger Hilfspro- 
gramme in einer systemati- 
schen Form zusammengestellt 
werden. Insgesamt umfaßt die- 
ses Buch über 40 Utilities, dar- 
unter mehrere völlig neuartige 
Programme wie Double-Lores, 
Double Hires, Screen-Format 
u.a. 

Der erste Teil enthält ein Repe- 
titorium der wichtigsten Befeh- 
je, Adressierungsarten und 
sonstigen Besonderheiten des 
6502. 

Im zweiten Teil werden alle 
Adressen des Monitors zusam- 
mengestellt, die für Assembler- 
Programmierer von Nutzen 
sein können. Darüber hinaus 
findet der Leser Unterroutinen 
für hexadezimale Addition/ 
Subtraktion/Multiplikation/Divi- 
sion, Binär-Hex-ASCIl-Um- 
wandlung usw. 

Der dritte Teil befaßt sich mit 
der Speicherverwaltung der 
Language Card und der lle- 
64K-Karte und enthält Move- 
Programme zum Verschieben 
von Daten in die und aus der 
Language Card sowie der 64K- 
Karte. 


Der vierte Teil ist dem Ap- 
plesoft-ROM gewidmet und li- 
stet eine große Anzahl nützli- 
cher Interpreter-Adressen. Bei 
den Utility-Programmen liegt 
das Schwergewicht auf Fließ- 
kommamathematik einschließ- 
lich Print Using. 

Der letzte Teil behandelt den 
Text- und Graphikspeicher. 
Neben einem professionellen 
Maskengeneratorprogramm 
werden auch Routinen zur 
Double-Lores- und Double-Hi- 
res-Grafik vorgestellt. 


Arbeiten mit dem 
Macintosh 


von N. Hesselmann 
416 Seiten, 320 Abb. DM 54,- 


Das Buch erklärt den Umgang 
mit dem Macintosh von Grund 
auf, wobei auch auf elementare 
Dinge eingegangen wird, wie 

z. B. die Benutzung der Tasta- 
tur und der Maus, das Einlegen 
von Disketten und den System- 
start. Ganz besonderes Augen- 
merk wird auf die Erklärung der 
speziellen Software-Umge- 
bung des Macintosh gelegt, 
wobei das Menü- und Fenster- 
konzept sowie das Anwählen 
durch Piktogramme gekenn- 
zeichneter Funktionen klar dar- 
gestellt wird. 
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Arbeiten mit dem 
Macintosh 


Ver a LET RS DT TE 


Der Umgang mit den Program- 
men MacPaint und MacWrite 
wird erläutert; dies geschieht 
teilweise anhand von Beispie- 
len, die leicht nachvollzogen 
werden können. Ein umfangrei- 
ches Kapitel ist dem für den 
Macintosh erhältlichen Micro- 
soft-BASIC gewidmet. 


BASIC Ubungen 

für den Apple 

von J. P. Lamoitier 

1983, 252 S., zahlr. Abb., kart., 
DM 38,— 


Das Buch ist konzipiert, allen 
Apple-Anwendern Applesoft- 
BASIC durch praktische Ubun- 
gen an Hand von reellen Pro- 
grammen beizubringen. Daten- 





verarbeitung, Statistik, kom- 
merzielle Programme, Spiele 
und vieles mehr. Jede Übung 
beinhaltet eine Beschreibung 
der Problemstellung, eine Ana- 
Ilyse der Lösungsmöglichkei- 
ten, ein Flußdiagramm und ein 
fertiges Programm samt Pro- 
belauf, 





Aus dem Inhalt: 

Ihr erstes BASIC-Programm — 
Flußdiagramme — Übungen mit 
Integerzahlen — Elementare 
Beispiele aus der Geometrie — 
Allgemeine Ubungen aus der 
Datenverarbeitung — Mathema- 
tische Berechnungen — Kauf- 
männische Berechnungen — 
Spiele - Operations Research 
— Statistik 


Apple ProDOS 
für Aufsteiger 
Band 1 


von Ulrich Stiehl 
1984, 202 S., kart., DM 28,- 


ProDOS ist das neue „profes- 
sionelle DOS“ (Professional 
Disk Operating System) für den 
Apple Ile sowie den mit einer 
Language Card ausgestatteten 
Apple Il Plus. Band 1 befaßt 
sich mit den theoretischen 
Grundlagen von ProDOS, der 
internen und externen Spei- 
cherorganisation und enthält 
grundlegende Beispielpro- 
gramme für Assembler-Pro- 
grammierer sowie generelle 
Untersuchungen zum BASIC- 
SYSTEM. Da ProDOS über er- 
heblich vielfältigere und lei- 
stungsfähigere, zugleich je- 
doch erheblich kompliziertere 
Dateistrukturen verfügt, sind 
theoretische Kenntnisse von 
ProDOS unabdingbar, wenn 
man die Features von ProDOS 
voll ausschöpfen will. 

Aus dem Inhalt: 

Ein erster Überblick - ProDOS 
und DOS 3.3 — Interne Spei- 
cherorganisation — Externe 
Speicherorganisation — MLI 
(Machine Language Interface) 
- ProDOS für Applesoft-Pro- 
grammierer 











Apples Maus lernt jetzt 
auch Pascal 





von Jürgen Geiß 
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Apples neuestes Eingabegerät heißt Maus. Es ist ein flaches 
Kästchen mit einem breiten „Kopf“ (Knopf) auf dem „Rük- 
ken“ und einem grauen „Schwanz“ (Kabel), der mit dem 
Computer verbunden wird. Erstmals wurde die Maus bei der 
Lisa vorgestellt. Beim Macintosh ist dieses Gerät bereits ein 
unabdingbarer Bestandteil des Mikrocomputers, d.h. der Mac 
läßt sich ohne Maus überhaupt nicht bedienen. Apple-ll- 
Besitzer, die die Maus einsetzen wollen, können nunmehr 
das sog. Maus-Paket erwerben. Allerdings läuft die Maus 
bislang nicht unter Pascal. Dieser Mangel wird durch die 
nachfolgende Pascal-Utility behoben. 


Das Maus-Paket umfaßt eine Interfacekar- 
te, die in einen beliebigen Slot des Apple 
Il, II+ oder Ile gesteckt werden kann, des 
weiteren die Maus, die mit der Karte zu 
verbinden ist, und eine Diskette mit dem 
Programm MousePaint, um die Benutzung 
der Maus zu demonstrieren. Für den Ap- 
ple lic ist keine Interfacekarte nötig; viel- 
mehr wird hier das Kabelende einfach auf 
der Rückseite eingesteckt. 


Allgemeines zur Pascal-Implemen- 
tierung 


Pascal bietet die Möglichkeit, Unterpro- 
gramme in einer Bibliothek abzulegen, die 
bei häufigem Benutzen einfach mittels ei- 
ner „uses”-Deklaration im Programm er- 
klärt werden. Diese Unterprogramme wer- 
den in der SYSTEM.LIBRARY zusam- 
mengefaßt. Will man Assemblerprogram- 
me in die SYSTEM.LIBRARY einbinden, 
so muß auch eine Pascal-Hostdatei exi- 
stieren, die mit dem Assemblerprogramm 
zu linken ist, ehe sie in die SYSTEM.LI- 
BRARY eingebunden werden kann. Die 
Benutzung der Maus erfolgt durch die Unit 
Mousestuff, die aus einer Pascal-Hostda- 
teil und einem Assemblerteil besteht. 

Zuerst wird der Pascalteil eingegeben und 
übersetzt. Am besten nennt man die Pas- 
cal-Hostdatei MOUSESTUFF.TEXT und 
den Code entsprechend MOUSESTUFF.- 
CODE. Anschließend wird der Assem- 
blerteil eingegeben und assembliert. Nen- 
nen wir den Assemblerteiil MOUSE.- 
ASS.TEXT bzw. MOUSE.ASS.CODE. 
Nun wird die Pascal-Hostdatei mit dem 
Assemblerprogramm mittels des SY- 
STEM.LINKERSs gelinkt. Die Anweisungen 
für das Linken entnehme man dem „Apple 
Pascal Operating System Reference Ma- 
nual“. Schließlich wird der gelinkte Code 
noch In die SYSTEM.LIBRARY eingebun- 
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den. Dies geschieht mit dem LIBRARY- 
Programm, das sich auf der APPLE3: Sy- 
stemdiskette befindet. Die Bedienung die- 
ses Programmes ist wiederum dem Hand- 
buch zu entnehmen. 


Die Beschreibung der Mouse-Unit 


Die Typen: Dem Benutzer der Mouse- 
Unit stehen zwei Pascal-Typen für die Pro- 
grammierung der Maus zur Verfügung: 
Mousemode und Mousestatus. 
Mousemode enthält folgende Kompo- 
nenten: 

Mouse_on: Soll die Maus eingeschaltet 
werden, so wird Mouse_on:= true ge- 
setzt, andernfalls Mouse_on:= false. 
Mouse_moved: Sollen Interrupts bei Be- 
wegung der Maus erzeugt werden, so wird 
Mouse_moved:= true gesetzt, sonst 
false. 

Button_pressed: Sollen Interrupts beim 
Drücken des Maus-Knopfes erzeugt wer- 
den, so muß Button_pressed:= true ge- 
setzt werden, sonst false. 
Screen_refresh: Sollen Interrupts jede 
1/60 Sekunde erzeugt werden, so muß 
Screen_refresh:= true gesetzt werden, 
sonst false. 

Reservdi — Reservdä4 sind reserviert für 
zukünftige Erweiterungen. 

Nach dem Setzen der Komponenten von 
Mousemode muß die Prozedur Setmouse 
aufgerufen werden, die dann die Modi an 
das Mouse-Interface übergibt (siehe Bei- 
spielprogramme). 

Mousestatus ist das „Button und Inter- 
rupt Status Byte“ und enthält folgende 
Komponenten: 

ReservdT: siehe oben. 

Mouse_moved: true, wenn ein Interrupt 
durch Mausbewegung erzeugt wurde. 
Button_pressed: true, wenn ein Interrupt 
durch das Drücken des Maus-Knopfes er- 
zeugt wurde. 
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Screen_refresh: true, wenn ein Interrupt 
erzeugt wurde, der mit Screen_refresh im 





Mousemode gesetzt wurde (jede 1/60 Se- 
kunde). 

Reserva2: siehe oben. 

X_Y_-changed: true, wenn die Maus be- 
wegt wurde und nicht, wie im Maus-Hand- 
buch steht, wenn sich die Maus-Koordina- 
ten geändert haben. 

Button_dwn_Ist: true, wenn der Knopf 
beim vorletzten Lesen der Mausdaten ge- 
drückt war. 

Button_down: true, wenn der Knopf ge- 
drückt ist. 


Die Prozeduren 


Dem Benutzer stehen folgende Prozedu- 
ren zur Verfügung: 

procedure setmouse (mode: mouse- 
mode): Diese Prozedur setzt die Maus in 
den Modus, der in der Variablen Mode 
angegeben wurde. 

procedure servemouse (var status: 
mousestatus; var mouse_interrupted: 
boolean): Wenn ein Interrupt durch die 
Maus verursacht wurde, wird der Status- 
record neu gesetzt. Ferner kann abgefragt 
werden, ob die Maus den Interrupt verur- 
sacht hatte. 

procedure readmouse (var x, y: integer; 
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var status: mousestatus,; var mode: 
mousemode): Diese Prozedur liest die ge- 
samten Maus-Daten in die angegebenen 
Variablen ein. Befindet sich die Maus im 
passiven Modus, so ist dies die einzige 
Prozedur, mit der die gesamten Maus- 
Daten gelesen werden können. 


procedure posmouse (x, y: integer): 
Diese Prozedur setzt die Maus-Koordina- 
ten auf die neuen X- und Y-Werte., 


procedure clampmouse (x_min, x_max, 
y_min, y_max: Integer): Der Wertebereich 
der Maus-Koordinaten kann durch diese 
Prozedur neu bestimmt werden. Wird 
clampmouse nicht aufgerufen, so gelten 
folgende Standardwerte: x_min = 
y_min:= 0, x_max = y_max:= 1023. 


procedure homemouse: Durch diese 
Prozedur wird die Maus-Position auf die 
unterste Grenze gesetzt, die mit clamp- 
mouse gesetzt wurde. Wenn clampmouse 
nicht aufgerufen wurde, so werden die 
Maus-Koordinaten auf x = y:= O gesetzt. 


procedure initmouse: Diese Prozedur 
muß vor allen anderen Prozeduren aufge- 
rufen werden. Sie initialisiert die Maus und 
setzt interne Default-Werte für clamp- 
mouse. Vorsicht: Bei einem Apple || und 
Apple II+ überschreibt initmouse die Seite 
1 der Hires-Grafik. Deshalb ist es erforder- 
lich, diese Prozedur aufzurufen, bevor 
Grafiken erzeugt wurden. 


function mouse_found: boolean Das 
Funktionsresultat ist true, wenn sich eine 
Maus im System befindet. 


Nun können alle Mausprozeduren, die im 
Maus-Handbuch beschrieben sind, von 
Pascal aus mittels der uses-Mousestuff- 
Deklaration aufgerufen werden. So kann 
zum Beispiel leicht folgender Programm- 
teil benutzt werden: 

IE mouse_found then initmouse usw. 

Ist keine Maus an das System angeschlos- 
sen und werden trotzdem Maus-Prozedu- 
ren aufgerufen, so erfolgt keine Fehler- 
meldung und es werden auch keine ROM 
Routinen angesprungen, so daß das Sy- 
stem auch korrekt weiterläuft, ohne sich 
„aufzuhängen“. 

Im Handbuch zur Maus werden einige 
Mausmodi angegeben, die mit Interrupt 
arbeiten. Da die Pascal-Versionen 1.0, 1.1, 
1.2 keine Interrupts verarbeiten können, 
empfiehlt es sich nicht, die Maus in einem 
dieser Modi zu betreiben. Daher sollte 
man die Maus nur im passiven Modus wie 
folgt benutzen: 


witn Mode do 
begin 


Mouse_on := true; 

Mouse_moved := false; 

Button_pressed := false; 

Screen_refresh := false 
end; 


Mit diesem Modus wird Setmouse aufge- 
rufen. Die Maus befindet sich nun im pas- 
siven Modus und sendet keine Interrupts 
an das System. Dann können alle Maus- 
prozeduren benutzt werden. 


Beispielprogramme 


Zwei Programme sollen den Umgang mit 
der Unit Mousestuff verdeutlichen. 

Das erste Beispielprogramm, Testmouse 
genannt, druckt die X-und Y-Werte und 
den Status des Druckknopfes aus. Damit 
kann man die Bewegungen und das Drük- 
ken des Knopfes der Maus genau beob- 
achten. Das Programm wird verlassen, 
wenn mit dem Knopf der Maus zweimal 
geklickt wurde, ohne daß die Maus bewegt 
wurde. 

Das zweite Beispielprogramm, Draw- 
Mouse genannt, demonstriert, wie man 
mit Hilfe der Maus Grafiken erzeugen und 
bearbeiten kann. 

Das Programm fragt zuerst nach einem 
Dateinamen des Bildes. Der Name darf 
nicht das Suffix „.GRÄAF" enthalten, da 
dieses automatisch hinzugefügt wird, und 
darf zudem nicht länger als 10 Buchstaben 
sein. Wird die Datei auf der Diskette ge- 
funden, so wird das entsprechende Bild 
geladen. 

Anschließend befindet man sich im Grafik- 
Bildschirm und hat einen Bleistift vor sich, 
mit dem gezeichnet werden kann, solange 
der Knopf der Maus gedrückt bleibt. Klickt 
man mit dem Knopf zweimal, ohne sich zu 
bewegen, hat man einen Radiergummi 
vor sich, mit dem man eventuelle Fehler 
wieder beseitigen kann. Auch der Radier- 
gummi ist nur aktiv, solange der Knopf der 
Maus gedrückt bleibt. Zweimaliges Klicken 
wandelt den Radiergummi wieder in einen 
Bleistift um usw. 

Wird die Tastatur benutzt, so werden die 
entsprechenden Zeichen an der Stelle, an 
der der Cursor (Bleistift oder Radiergum- 
mi) steht, auf dem Bildschirm ausgege- 
ben. Damit kann man seine Schöpfung mit 
Texten versehen. 

Das Programm kann durch Drücken der 
ESC-Taste verlassen werden, wobei das 
Bild auf Diskette gespeichert wird. Das 
Bild kann dann wieder beim erneuten Auf- 
ruf des Programmes geladen und weiter- 
verarbeitet werden. 
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MOUSESTUFF 


{$St} 


{$von Jürgen Geiß; September 1984} 


unit mousestuff: intrinsic code 25; 


interface 


type mousemode 


= packed record 
Mouse_on 
Mouse_moved 
Button_pressed 
Sscreen_refresh 
Reservdl 
Reservd2 
Resarvdö 
Reservd4 
end; {Mousenode} 


: boolean; 
ı boolean; 
; boolean; 
: boolean; 
: boolean; 
ı boolean; 
: boolean; 

boolean; 


mousestatus = packed record 


procedure 
procedure 


procedure 


procedure 
procedure 
procedure 
procedure 
procedure 


function 


Reservdl : boolean; 
Mouse_moved : boolean; 
Button_pressed : boolean; 
Sscreen-refresh : boolean; 
Reservd2 : boolean; 
X_Y_changed : boolean; 
Button_dwn_1st : boolean; 
Button_down boolean; 
end; {Mousestatus} 


setmouse [mode mousemode}; 
servenmouse (var status : mousestatus; 

var mouse_interrupted : boolean)}: 
readmouse (var x, y : integer; 

var status : mousestatus; 

var mode mousemode); 
clearmouse; 
posmouse (x, y : integer); 
clampmouse (x_min, x_max, y_min, y_max ! 
homenmouse; 
initmouse; 


integer); 


mouse_found : boolean; 


implementation 


{ 


procedure 
external; 
procedure 


external; 
procedure 


external; 
procedure 
external; 
procedure 
external; 
procedure 
external; 
procedure 
external; 
procedure 
external; 


en } 


setmouse {mode : mousemode} ; 


mousestatus; 
: boolean}; 


servemouse {var status 
var mouse_interrupted 


readmouse {var x, y : integer; 
var status : mousestatus; 
var mode : mousenode} ; 
clearmouse; 
posmouse {x, y : integer}; 
clampmouse {x min, x max, y_min, y_max : integer}; 


homemouse; 


initmouse: 


function mouse_found {: boolean}; 


external; 


procedure 
external; 


searchmouse; 


begin {mousestuff} 
searchmouse 
end {mousestuff}. 


Beispielprogramm 1: TESTMOUSE 


program Testmouse (output); 


uses Mousestuff; 


var I 
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integer; 














pascal 94 





Mode : mousemode; 
Status : mousestatus; 
A, Y : integer; 
ClickCount integer; 


begin 
initmouse; 
writeln ('Maustest: '); 
fillchar (Mode, size_of (Mode), 9); 
Mode .‚Mouse_on := true; 
setmouse (Mode); 
clearmouse; 
readmouse (X, Y, Status, Mode); 


with Status do 
begin 
gotoxy (8, 19); 
wertelmel >28 1,02 2 216); 
eriteim (er N 7 le) 
writeln ('X_Y_changed: ‘. ord (X Y changed)); 
writeln ('Button_down_last: ', ord (Button_dwn_1st)): 
writeln ('Button_down: ', ord (Button_down)) 
end; {with} 


ClickCount := 6; 


repesat 
with Status do 
begin 
readmouse (X, Y, Status, Mode); 
if X_Y_changed 
then ClickCount := 
else 
if not Button_down and Button_dwn_1st 
then ClickCount := ClickCount + |; 


if X_Y_changed or Button_down then 
begin 
gotoxy (15, 19); 
write {X : 4); 
gotoxy (15, 11); 
write {Y : 4); 
gotoxy (18, 12); 
write (ord (X_Y_changed)); 
gotoxy (18, 13): 
write (ord (Button_dwn_1st)); 
gotoxy (18, 14); 
write (ord (Button_down)) 
end {if} 
end {with} 
until ClickCount = 2; 


fillchar (Mode, size_of (Mode), ®); 
setmouse (Mode) {Schalte Maus ab} 
end. 


Beispielprogramm 2: DRAWMOUSE 


{($1-} 
{$R-} 


program DrawMouse (input, output); 
uses Turtlegraphics, Applestuff, Mousestuff; 


const Hiresblks = 16; 
Xdots 289; 
Ydots 192: 
{max = Le 
Ymax 191; 
AdrPagel 8192; 


PencilX 
PencilY 
EraserX 
EraserYy 


BEL 
ESC 


Sole 
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type 


Penciltype 
Erasertype 
Trickarray 


R#type 
XY_type 


packed array [1..PencilY, 1..PencilX] 
of boolean; 
packed array [l..EraserY, 1..EraserX] 
of boolean; 


= packed array [®..®] of 8..255; 


{DoRead, DoWrite); 
record 

X : integer; 

Y : integer 
end; {XYtype} 


(mm 1 


Cursor 
LastCursor 
Memory 
Moved 

Key 

Keyhit 
Button_down 
Last_down 


: AY_type; 
5 AY_type; 


TTrickarray; 


: boolean; 


char; 
boolean; 


: boolean; 
ı boolean; 


GlickCount 
Command 


integer; 
integer; 


Penciltype; 
Erasertype; 


Pencil 
Eraser 


file; 
string; 


Graphfile 
Graphname 
Mode ‘ Mousemode; 
Status ı Mousestatus; 
I : integer; 


l— 


procedure Init; 


procedure InitPencil; 
{erzeugt einen Bleistift} 


var Row :!: integer; 


 ) 


procedure CreateLine (S : string); 


var 1 integer; 

begin {Createline} 
for I := 1 to length (5) 
do Pencil [Row, I] :=S [I] <> ' '‘; 
Row := Row - 1 

end; {Createline} 


| m 


begin {InitPencil} 
Row := PencilY; 
Createline 
Createline | 
Createline 
Createline 
Createline 
CGreateline 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 
Greateline 

end; {InitPencil} 


procedure Initkraser; 
{erzeugt einen Radiergummi} | 


var Row integer; 
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procedure CreateLine (S : string): 
vr I integer; 
begin (Createline} 
for I := 1 to length (5) 
do Eraser [Row, I] :=S [I] <> ' '; 
Row := Row — 1 
end; {Createline} 
{= = } 
begin {InitEraser} 
Row := EraserY; 
Greateline (' are!) ; 
Createline (' * ="); 
Createline (! * ”*'); 
Createline (' * x“**'"); 
Createline (' « “r* '); 
Createline ("weather |); 
Greateline ('* x* Die 
Createline ("aka =) 
end; {InitEraser} 
{ a m a en 
begin {Init} 
Cursor .X = 14ß; 
Cursor.Y = 92; 
LastCursor ‚= Cursor; 
Menory = nil; 
Command =]; 
Moved := false; 
Keyhit ‘= false; 
Key := chr ({ß); 
Button_down = false; 
Last_down := Button_down: 
if Mouse_found 
then 
begin 
Initmouse: 
fillchar (Mode, size_of (Mode), B); 
Mode .Mouse_on := true; 
Setmouse (Mode); {setzte Maus auf passiven Modus 
(keine Interrupts}} 
Clearmouse; 
Clampmouse (ß, 2 * Xdots - 1, ß, 2 = Ydots - 1): 
{2 » Xdots, 2 = Ydots; damit werden 
feinere Bewegungen möglich} 
with Cursor do posmouse (X & 2, (Ymax - Y) « 2) 
end {then} 
else | 
begin 
writeln 
{chr (BEL), 'Fehler: Keine Maus angeschlossen!'); 
exit (program) 
end; {else} 
InitPencil; 
InitEraser; 
initturtle; 
fillscreen (white); 
with Cursor do moveto (X, Y); 
textmode | 
end; {Init} | 
| 
( -) | 
procedure RW_Graph (ReadW#rite R#wtype); | 
var Blocks : integer; 
begin {RW_Graph} 
case ReadWrite of 
DoRead Blocks := blockread 
(Graphfile, Menmoryt [AdrPagel], Hiresblks, 9); 
DoWrite : Blocks := blockwrite 
(Graphfile, Memory? [AdrPagel], Hiresblks, ß) 
end; {case} 
if Blocks <> Hiresblks then 
begin 
writeln 
(chr (BEL), 'Fehler beim Lesen/Schreiben der Grafik!'); 
exit (program) 
end {if} \ 
end; {RW_Graph} 
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eine gezielte Beant- 
wortung Ihrer Anfrage 


Zum Schluß tragen 
Sie auf der Rück- 
seite die genaue 
Anschrift des 
Inserenten/Herstellers 
und Ihre vollständige 
Firmenanschrift ein. 


EEKER 


MAGAZIN FÜR APPLE-COMPUTER 












procedure AskFile; 





begin {AskFile} 
repeat 

write 
("Name der Grafik-Datei (ohne das Suffix "GRAF"): 6 
readln (Graphnane); 
if Graphname = '' then Graphname := '=SYSTEM.WRK'; 
Graphname := concat (Graphname, ',GRAF'); 

reset (Graphfile, Graphname); 














if IOresult = ® 
then 
begin 
writeln; 
writeln ('Lese ', Graphname): 
grafmode; 
RW_Graph (DoRead); 
textmode 
end {then} 
else rewrite (Graphfile, Graphname) 
until IOresult = ß 
end; {AskFile} 


| 


procedure GetEvent; 

















m en 






{ mm mm en 0 






procedure Testmouse:; 






{liest die Mausdaten} 






begin (Testmouse} 
with Cursor do 
begin 

Readmouse (X, Y, Status, Mode): 













X :=X div2; 
Y:=Ydiv2; 
Y:= Ymax - Y 
end {with} 
end; {Testnouse} 








{ Bee 





begin {GetEvent} 







LastCursor := Cursor; 
Last_down = Button_down; 
Keyhit = keypress; 






if Keyhit then read (keyboard, Key); 







Testmouse; 
Button_down := Status.Button_down; 

with Cursor do Moved := (X <> LastCursor.X) or 
(Y <> LastCursor,Y); 








if Moved 
then ClickCount := ® 
else if Last_down and not Button_down then 
GlickCount := ClickCount +1 
end; {GetEvent} 











mm 





procedure Draw; 





var Color screenoolor; 







[ mm } 
. 





procedure PencilDraw (Position : XY_type): 








begin {PencilDraw} 
with Position do 
if (X in [®..Xmax]) and 
(Y in [®8.,Ymax]) then 
drawblock 
(Pencil, 2, ®, ®, PencilX, PencilY, X, Y, 6) 
end; {PencilDraw} 


{ Ber” 


procedure DrawPencil; 














m nr m m 





m} 









begin {DrawPencil} 
PencilDraw (Cursor) 
end; {DrawPencil} 
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a — 







procedure ErasePencil; 





begin {ErasePencil} 
PencilDraw (LastCursor) 
end; {ErasePencil} 







BE EEE 00000 ze 





[m——— 






procedure EraserDraw (Position XAY_type; Mode integer); 








begin {EraserDraw} 
with Position do 
if (X in [®..Xmax]} and 
(Y in [®.,Ymax]) then 
drawblock 
(Eraser, 2, ß, ®, EraserX, EraserY, X, Y, Mode) 
end; {EraserDraw} 











 — ——— 






procedure DrawEraser; 





begin {DrawEraser} 
EraserDraw (Cursor, 6) 
end; {DrawEraser} 










procedure EraseEraser; 






begin {Erasekraser) 
EraserDraw (LastCursor, 6) 
end; {EraseEraser} 






procedure DrawCursor; 






begin {DrawCursor} 
case Command of 
1 : DrawPencil; 
2 : DrawEraser 

end {case} 
end; {DrawCursor} 
















a De u a za } 





procedure EraseCursor; 






begin {EraseCursor} 
case Command of 
1 : ErasePencil; 
2 : EraseBraser 
end {case} 
end; {EraseCursor} 









procedure HandleMove:; 






var Mode integer; 





begin {HandleMove} 
case Command of 
l : with Cursor do moveto (X, Y); 

2 : if Button_down then 









begin 

Mode := 15; 

EraserDraw (Cursor, Mode) 
end {if} 






end {case} 
end; {HandleMove} 


(mm nn 


procedure Handlekeys; 








begin {HandleKeys} 
EraseCursor; 
wchar {Key}; 
DrawGursor 

end; {HandleKeys} 








I——- - 
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procedure Init; 


begin {Init} 


Color := none; 
pencolor (Color); 


chartype (5); 


with Cursor do moveto (X, T]; 


Drawtursor 
end; {Init} 


begin {Draw} 
Int; 


repeat 
Getkvent; 


if Clickcount 


begin 


ClickCount := ß; 
EraseCursor; 


Command 


:= Command + 1; 


if Command = 3 then Command := ]; 
Drawltursor 


end; {if} 


if Moved then EraseCursor; 
if Keyhit then Handlekeys; 


MAUS.ASS 


EREFTFEEIEIEETEEEEEEEEEFFFETFTIEIERRERRER 


Externe Frozeduren für Unit MOUSESTUFF 


APPLE PASCAL [1,8], [2.1], [1#2] 


type mousemode 


= packed record 


Mouse_on 
Mouse_moved 


Button_pressed : 
Screen_refresh : 


Reservdi 
Reservd2 
Reservdö 
Reservd4 


end; {mousenode} 


mousestatus = packed record 


Reservdl 
Mouse_moved 


Button_pressed : 
Screen_refresh ! 


Reservd2 
X_Y_changed 


Button_dwn_1st : 


Button_down 


ı boolean; 
ı boolean; 
boolean; 
boolean; 
: boolsan; 
: boolean; 
: boolean; 
: boolean 


: boolean; 
: boolean; 
boolean; 
boolean; 
: boolean; 
ı boolean; 
boolean; 
: boolean 


if Button_down 


then Color 
else Color 


:= black 
:= none; 


pencolor (Color); 


if Moved then 


begin 


HandleMove; 
Drawtursor 


end {if} 
until Keyhit 


LastCursor 
EraseCursor; 
end; {Draw} 


{ nn en 


begin 


and (Key = chr (ESC)}; 


‘= Gursor; 


page (output); 


Init, 
AskFile; 
Grafmode; 
Draw; 
textmode; 
writeln; 


write ('Grafik wird abgespeichert... '); 
RW_Graph_(DoWrite); 
close ({Graphfile, lock) 


end. 


EEK TE EEE 


procedure setmouse (mode : 
procedure servemouse (var status : 


procedure readmouse (var X, y: 


procedure clearmouse; 
procedure posmouse (x, Y : 
procedure clampmouse (x_min, X_max, y_min, y-max : 


procedure homemouse; 
procedure initmouse; 
function 


end; {mousestatus} 


mousemode): 
mousestatus; 
: boolean) 

integer; 

var status : mousestatus; 

var mode : mousemode); 


mouse_interrupted 


integer); 


integer); 


mouse_found : boolean; 


ar rettete kat 


area 


Fortsetzung S. 57 





Wie man das Maus-Modul implementiert: 


| Schritt 1: MOUSESTUFF und MOUSE.ASS als Pascal- Somit entsteht die fertige Library unter dem 

| Textfile eingeben und abspeichern oder von Namen „MOUSE.CODE. 

| oz nmeuizr mr SElD0> onen Schritt5: LIBRARY-Programm von APPLE3-Diskette 

| Schritt 2: MOUSESTUFF compilieren über C-Kommando über X-Kommando aufrufen: 

unter MOUSESTUFF.CODE. Schritt 5a: Auf Frage „Output-Code-File“ mit „*“ ant- 

| Schritt 3: MOUSE.ASS assemblieren über A-Kommando worten. 

I unter MOUSE.ASS.CODE. Schritt5b: Auf Frage „Link-Code-File"“ mit „x" ant- 

| Schritt 4: Linker über L-Kommando aufrufen: worten. 

Schritt 4a: Auf Frage „Host-File?“ mit MOUSESTUFF ant- Schritt 5c: Nunmehr mit „=*-Kommando alle Slots kopie- 
worten. ren. 

| Schritt 4b: Auf Frage „Lib-File?“ mit MOUSE.ASS ant- Schritt5d: Nun N-Kommando eingeben und wie in Schritt 
worten. 5b mit „MOUSE antworten. 

I Schritt 4c: Mit Return Linker beenden. Schritt5e: „1“ Return und danach z.B. „6“ Return (= muß 

Schritt 4d: Auf Frage „Map-File“ auch mit Return ant- ein noch freier Slot sein) eingeben. 
worten. Schritt5f: Mit Q-Kommando LIBRARY-Programm verlas- 
Schritt 4e: Auf Frage „Output-File“ mit MOUSE antworten. sen 
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Pascal 4 





serreie PLA 
STA MODEADR 
PLA 

STA MODEADR+1 


.NOPATCHLIST 


RETURN ‚EQU $8 


CNdB ‚EQuU 82 .PROC SETMOUSE,1 


.REF CALLMOUSE, SLOT PLA 


STA STATUS_ADR 
PLA 
STA STATUS_ADR+1 


;Maus-Konstanten 
SET .EQU 12 MODE_ADR ‚EQU 1 
SERVE .„EQU 13 
READ EQU 14 
CLEAR ‚EQU 15 
POS ‚EQU 16 
CLAMP ‚EQU 17 
HOME .EQU 18 
INIT .EQU 19 


PULL RETURN 


PLA 

STA Y_ADR 
PLA 

STA Y_ADR+1 


;hole Adresse des Modus 
PLA 
5STA MODE_ADR 
PLA 


STA MODE_ADR+1 PLA 


STA X_ADR 
PLA 
STA X_ADR+1l 


X-LOW ‚EQU 478 
Y_LOW .EQU 4F8 
X HIGH .‚EQU 578 
Y_HICGH .EQU 5F8 
RESERVD1 ‚EQU 678 
RESERVD2 ‚EQU 6F3 
STATUS .„EQU 778 
MODE .EQU 7F8 


PUSH RETURN 


LDA’SLOT 
sau31 PUSH RETURN 
LDY +98 

LDA (MODE_ADR),Y 
LDY #SET 

JSR CALLMOUSE 


LDA SLOT 
BEQ $1 


LDY #READ 
JSR CALLMOUSE 
LDX SLOT 


IRFFFFFRFFERERFEFFFETEFET FFIR KIT 


.MACRO PULL el N 
rereereeeeeeeeeak | LDY #98 
LDA X_LOW,X 


‚PROC SERVEMOUSE, 2 STA (X_ADR),Y 
INY 


‚REF CALLMOUSE, SLOT LDA X HIGH, X 
STA (X_ADR),Y 


PLA 

STA 21 
PLA 

STA 141 


ENDM 
STATUSADR .EQU 18 


MOUSE_INTERADR .EQU 12 LDY #99 
LDA Y_LOW,X 


PULL RETURN SlA (Y-ADR),. I 
INY 
PLA LDA Y_HIGH,X 


STA MOUSE_INTERADR STA (Y-ADR),Y 
PLA 


STA MOUSE_INTERADR+1 LDY #89 
LDA STATUS,X 


PLA STA (STATUS_ADR),Y 


STA STATUSADR | 
PLA LDA MODE,X 


STA STATUSADR+1 STA (MODE_ADR),Y 


Be 
„MACRO PUSH 
LDA Z1+1 
PHA 
LDA %1 
PHA 
. ENDM 


Erreeereneeerrrrereiererrrr 


„PROC SET_CN_N® 


PUSH RETURN $1 


‚DEF SLOT 
LDA SLOT 
BEQ $1 


EEE 


PHA 
LDA 
ORA 
TAX 
ASL 
ASL 
ASL 
ASL 
TAY 
PLA 
RTS 


LDY #5ERVE 

JSR CALLMOUSE 
;Hole Carry Bit in Akku als Bit ® 

ROL A 

AND #ßl 


‚PROC CLEARMOUSE 
‚REF CALLMOUSE, SLOT 


LDA SLOT 


LDY #09 BEQ $1 


STA (MOUSE_INTERADR),Y 
INY 
LDA #89 


LDY #CLEAR 
JSR CALLMOUSE 


SLOT .WORD & :Bit 7 immer 


STA (MOUSE_INTERADR) ,Y s1 RTS 
FERIEN EIER I FF Er 
= 199 rear 
LDX SLOT 

LDA STATUS, X 


STA (STATUSADR),Y .PROC POSMOUSE, 2 


.PROC CALLMOUSE 
‚REF SLOT, SET_CN_N® 
PHA $1 RTS ‚REF CALLMOUSE, SLOT 
LDA +90 

STA CNöß 

LDA SLOT 

ORA #009 

STA CNÖß+Ll 

LDA (CNBß),Y 
JSR SET_CN_NG® 
STA INDIRECT 
STX INDIRECT+H 
PLA 

JMP INDIRECT 


ERRRIIIrr FULL RETURN 
LUX SLOT 
.PROC READMOUSE, 4 
PLA 
‚REF CALLMOUSE, SLOT STA Y_LOW,X 
PLA 
X_ADR ‚EQU 1% STA Y_HIGH,X 
Y_ADR ‚EQU 12 
STATUS_ADR .EQU 14 | PLA 
MODE_ADR ‚EQU 16 STA X LOW,X 
PLA 


INDIRECT ‚WORD ® PULL RETURN STA X_HIGH,X 
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PUSH RETURN LDA SLOT 


BEQ $2 


‘Das höchste Byte einer Booleschen 
;Yariablen ist immer ® 

LDA #08 

PHA 

LDA SLOT 
‚Keine Maus gefunden, dann 

BEQ $1 

LDA #91 


LDA SLOT 
BEQ $1 Setze neue Grenzen für X-Koordinate 
| LDA +89 

| LDY #CLAMP 


JSR CALLMOUSE 





LDY #POS 
JSR CALLMOUSE 














$1 RTS $2 RTS 


PHA 
EREFTEEEEEEEEEEREEET. ee 


PUSH RETURN 


„PROC CLAMPMOUSE, 4 ‚PROG HOMEMOUSE RTS 


‚REF CALLMOUSE, SLOT ‚REF CALLMOUSE, SLOT IE 
AY_MIN_LOW IEOU ATE LDA SLOT ‚PRÜCG SEARCHMOUSE 
AÄY_MAX_LOW ‚EQU AF8 BEQ $1 
XY_MIN_HIGH -EQOU 578 ‚REF SLOT 
XY_MAX_HIGH .EQU 5FB LDY +HOME 

JSR CALLMOUSE ‚EQU 98 
PULL RETURN 
$1 RTS LDX #8 











LDA 


PLA #B0 


STA XY_MAX_LOW EEE EEE EEE ee STA SLOT 
PLA | STA TEMP 
STA XY_MAX_HIGH ‚PROC INITMOUSE LDA #908 
PLA STA TEMP+l 

























STA XY_MIN_LOW ‚REF CALLMOUSE, SLOT 

PLA DEC TEMP+1 

STA XY_MIN-HICH LDA SLOT DEX 
BEQ $1 BEQ EXIT 

EBA- SEO LDY #0C 

BEQ $1 LDY #INIT LDASI TEMEI N 
JSR CALLMOUSE CMP #29 

;:Setze neue Grenzen für Y-Koordinate BNE $1 
LDA #Pl 51 RTS LDY #®FB 
LDY #CLAMP LDA (TEMP),Y 


CMP #ßD6 
BNE $1 
STX SLOT 


JSR CALLMOUSE 


‚neuen 













PLA .FUNC MOUSE_FOUND 





STA XY_MAX_LOW EXIT RTS 
PLA .REF SLOT 
STA XY_MAX_HIGH eek 
PLA PULL RETURN 
STA XY_MIN_LONW ‚END ;mousestuff 
PLA PLA 
STA XY_MIN_HICH PLA 
PLA 
PUSH RETURN PLA 





APPLE - BISKETTEN LAUFWERKE -- APPLE 
Original Disk II m. Controller + DOS3:3 + Hdbuch DM 995,— 
Original Disk Il {2 Laufwerk) DM 765.— hl Verwendung des 
Duo-Disk Station Slimline, 2 x 143KB Chinon DM 995 —  AratmHeirlabaupeieme 
Siemens Disk-Laufw , 143KB, m. Kabel + Gehäuse DM 525.—  — 
Abor-Disk-Laufw , Slimline, 143K8, m Kab, + Geh DM 435, — 
Chinon Slimline, 143KB, Superleise, m, Kab. +Geh DM 495,— 
Teac 55F, 1 MB unf Kapazität, Shugartbus DM 625.— 
Teac 55F, kpl, in Gehäuse, 40/BD Track, IMByle 

anschlußfertig, mil Umschaltung 40/80 + Kabel DM 698,— 
Zweillaufwerk für Apple II &, 143 KB, mil Kabel DM 498,— 
APPLE = INTERFACES + MAINBOARDS -- APPLE 
Disk Controller f_2 Original o. kompat. Drives "DM 89, — 
Super-Controllar f. 2x Teac 55F, mit Software "DM 239,— 
80 Zeich-Karte mit 64K RAM + Soltsw. f Ile DM 395,— 
80 Zeich-Karte Il, m. Softswilch, 2 Zeichensätze "DM 159,— 
16K RAM Erweilerung lür Il und kompatible DM 94,— 
Z 80A Inlerlace Karte für CPM 2? DM 89— 
Z 808 Interface Karte für GPM 30, m. 64K AAM DM 595,— 
Prinler-Grafik Inierface, Epson kompatibte "DM 98.— 
Cenlronic-Paralell Text-Intarface Karte "DM  94,— 
Printer-Grafik Interface, NEC/ITOH kompalibel "DM 169,— 
Anschluß Kabel f Paralell + Grafik Interface DM 34,— 
Buffer Grafik-Intertace, benutzbar für Drucker 
Epson/Nec/lioh/Okidala u andere m. 32K Buffer DM 348,— 
Bufier Interface wie vor aber mit 64K Buffer “DM 595,— 
Anschluß Kabel f. Buffer Interface Karte DM 39,— 
232C Serialle Interface Karte "DM 109,— 
Super Serielle Interface Karte, Fulfduplex "DM 288,— 
Sprach (Speech) Karte f. Sprachwiedergabe "DM 78,— 
6522 Paralelt Interface Karle "DM 149,— 
Clock Karle {Datum/Uhrzeil} Ein/Ausgabe "DM 129,— 
Eprom Wriler Karle (2716 - 2764} "DM 129,— 
IEEE-488 Interface Karte "DM 398,— 
Logo-Karle mit Diskette und Handbuch DM 498,— 
Musik Karte m. Diskelte und Handbuch "DM 119,— 
PAL Color Interface Karle (UHF + Video} "DM 129,— 
AGB Interface Karte {f. Appfe ll + II+} "DM 169, — 
Wilg Karte (kopieri uber RAM-Bereich) "DM 119,— 
128K RAM Erweilerungs Karte m. Patchsoftware "DM 448,— 
256K RAM Erweilerungs Karte m. Patchsoftware "DM 698,— 
6809 Prozessor Exell-9 Interfacekarte +DM 399,— 


a IBM ''' KOMPATIBEL **'*' IBM ** KOMPATIBEL * 
Reparalurservice Alle Teile unterliegen einer sorglältigen Endkontrolle und wir 
übernehmen daher volle Garantie für die Funktionsfähigkeit, 
sowohl für die gelieferten Leerplatinen, ats auch für die fertig 
bestuckten Boards und Inlerface Karten, die fast ohne Ausnahme 
mit gesockelten IC’s geliefert werden 
IBM -- Kompatible Interface Karten und Malnboards -- IBM 
Disk Controller Karle für 2 Disk-Drivas "KL-2020 310,— 
Disk Controller Karle fur 4 Disk-Drives "KL-2021 399, — 
Color Yidao Board, Farb- und Yıdeo Ausg "KL-2050 698, — 
Monochrome Video Boards "KL-2960 398, — 
AS 232 Drucker Interface Karte KL-2074 139, — 
Centronics Paralell Interface Karte KL-2672 198,— 
Mullifunkliorı Karle, RAM-Bereich, R5232, 
Paralell, Clock, mit O K bestückt 
dto. wie vor, jedoch mit 129K bestückt 
dt wie vor, jedoch mil 256K bestückt 
512K RAM Karte, mil OK bestuckt KL-2095 
dto- wie vor, mit 328K bestückt KL-2996 
Multi l/O Interface Board, RS232, Disk-Gontroller, 
Centronics, Clock, Joystick 
und Lighlpen-Port 
Eprom Writer Karte (bis 128K benutzbar) a. Ä 
Hardisk/ Winchester Host-Adapter Karte  "KL-2022 DM 1188,— 
Mainboard XT Version. 9 Siots S4K bestuckt 
mit 1 Boot-Eprom, 6 Eprom-Plätze Ireı "KL-1004 DM 1288,— 
dito wie vor. jedoch mil 128K bestuckt "KL-1005 DM 1449, — 
dia. wie vor, jedoch mit 255K bestuckt "KL-1006 DM 1799,— 
Mainboard PC Version, 8 Siots_84K bestuckt 
mil 1 Boot-Eprem, 6 Eprom-Platze frei *KL-1010 DOM 999,— 
dio wie vor, jedoch mit 128K bestückt 'KL-1071 DM 1289,— 
dito. wie vor, jedoch mit 256K bestuckt "KL-1012 DM 1579,— 
Beı den mit * gekennzeichneien Arlikeln gehört zum Lieferumfang 


190% Appte-kpmpalibal Le et: TE: Thies 





"KL-2040 
"KL-2041 
"KL-2042 


559,— 
B99,— 
1245,— 
H48,— 
689, — 


APPLE -- ORIGINAL + KOMPATIBLE - COMPUTER -- APPLE 
APPLE Ile, 64KRAM, Ascii-Tastat + UHF-Modul DM 2198, — 
APPLE He. Einsliegspaket = Computer 64KRAM, 
+ Philips-Monitor 18 Mhz grün + Siemens F122 - 
Laufwerk 143K m. Controllgr + Lawrialsatie 
APPLE ILC, 128 KRAM, ASCII Tastatur 

APPLE U C, wıe vor, jedoch deuische Tastalur 
MACINTOSH System kompleti m. Mouse+ Tastatur 
+ Macwrite/Macpaint, Syslemguide-Diskette 
MEWÄA-4AK, Apple kompat. Netzt. 5Amp, Tastalur 
mit Dopp-Belegung + 10 irei Prog.Tasten, mil 
UHF-Mod , onne Firmware Eproms. 

MEWA-BAK. wie vor jedoch mit i5er Block 

MEWA 9000er Serie, mit seper Tastat. DINo ASCII 
m dopp. beiegt. Funkt-Tasten, Cursorbl, + 15er 
Block Netzt 5 Amp., Gehause fur 2x Slimline- 
Laufwerke UHF-Modulator, o. Firmw -Proms 
(12KROM), 48K RAM DM 1098,— 1 \ 
MEWA 9000-64-C, wie vor jedach 64K RAM DM 1198, — ein Manual. undz T ein Schaltbild 
Schaitnetzteile lür APPLE u- kompalible Rechner MEWA 9000-84-C Einstiegspaket, wie vor, jedoch IBM .. Kompatible Leerplatinen 
+5W7/3,5A -5W/0,5A +12W/2A -12V/0,5A N73 DM 99,80 mit 1 Disk Drive eingeb. + Disk-Contr. + Monilor, Disk Controller { 2 Drives 

+BY/5 A -5V/0,5A +12V72,5A -12V/0,5a N?74 DM 119,80 grün Disk Controller f. 4 Drives 

+BVW/7,5A -5V/O5A +12V/2A -12V70,5A N?S DM 149,50 Color Grafik Video Board 

»"- DISKETTEN + PISKETTEN-BOXEN „ tr RS232 Interface Karte 

Profi Disk Box, m. Schloß, Klars-Deckel, 100Diskss DM 49,— Centronics Paralell Inierlace Karta 
Disk Box mit Klars -Deckel, ca. 70 Disketlen 5" DM  26,— Mullitunktion Interface Board 

Hartbox für 10 Disketten, mit Klappdeckel DM 6,90 Eprom Writer Interface Karte 


APPLE :TASTATUNENH+LEERTGEHÄUSE + HETFTEILE- APPLE 
Standard Einbau-Tastatur, ASCII, freibel-9 Tasten, 

Doppelbelg. aller Taslen, Groß+Kleinschr. Nr.N26 DM 139,— 
Taslalur wie vor, jedoch mit 15er Block Nr.N67 DM 178,— 
Taslalur Nr N67, mit sep. Gehäuse, kpl.m Kabel DM 249,— 
Seperate Tastatur IBM-Look, anschlußfartig mit 

Kabel, Dopp belegt Tasten, freiprog Funkt Tasten DM 299,— 
Seperate Taslatur, Eprom progr.-bar, Gursorblock 

Tastenleld mil 24 Funktionen, Deulsch 0. ASCII DM 399,— 
Leergehause Standard, passend TastaturNr.N26 DM 98.— 
dto. wie vor, jedoch passend für 15er Tast. N67 DM 119,— 
Leergehäuse wie Mewa 9000, für Einbau von zweı 
Slimline-Laufwerken + Tastaturanschluß, Plastic DM 159,— 
Leergehäuse wie vor, jedoch ın Melall-Ausführung DM 198,— 
Lsergehäuse IBM-Look, f. 2 Laufw. Standard 5" DM 198,— 
Leergehäuse für 1 Slimline Laufwerk, Metall DM 19,90 
Leergehäuse I Duo-Disk = 2x Slimline-Laufwerke DM 98.— 
Leergehäuse IT Duo-Disk = 2x Standard-Laufw. DM 109,— 
Leergehäuse ft. Duo-Disk = 2x Slimline + Netzteil DM 179,— 


DM 3098. — 
DM 2795,— 
DM 2998, — 


"KL-2071 898, — 


DM 5995, — 


DM 889,— 
DM 948,— 


+ Boards IBM 
68, — 
78,— 
99,80 
68.— 
68. — 


DM 2098, — 
IBM-Look Gehäuse für MEWA 9000 Serie Aufpreis DM 68.— 
»- MATRIX- UND TYPENRAD - DRUCKER = """""""" 
CP-80 Matrix Drucker, Epson kompat., vollgrafikf DM 739,— 
CP-80 X mit eingeb_ Interface für VC 641. Sim. B. DM 8939,— 


zurırana 
Keeihend 


DM 759,— 


iC-Tester Interface Karte (RAMS/TTL 54/74} 
Hauptplatine 48K, o. Firmware Eproms, 8 Slols 
Hauptplatine 64K, wie vor 

AFPLE - LEERPLATINEN - 


DM 
DM 
DM 


449, — 
548, — 
648— 


APPLE 


Leerplalinen der obigen Interface Karten sind alle ın vergoldet, 


m. Bestück-Aufdruck + Best -Plan lieferbar 
Leerplatinen mit der Kennzeichnung 

Leerplatinen mit der Kennzeichnung 

Leerplatinen mit der Kennzeichnung 
Experimentiier Platine, für Apple SIol EX300 
Experimeniier Platine, für Apple 5iot EX509 
Leerplatine Motherboard, 48K, mit Best--Aufdruck 
Leserplatine Motherboard, 64K, mit 6502 + Z80 
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DA 
"DM 


+ DM 


DM 
DM 
DM 
DM 


3ı.— 
24h 
33. 
29.50 
19,0 
b6,— 
9,— 


Disketlen, mit Verstärkungsring, 3 Jahre Garantie 

ABK 100 = SS/5D 10 Sick a- 3,98 50 Stck. a.3,88 500 Stck: a: 3,59 
ABX 200 = 55/DS$ 10 Sick a. 4,0850 Sick, a_3,98 500 Stck, a,3,69 
ABX 400 = DS/DD 10 Stck a. 4,98 50 Sıck. a. 4,8B 500 Stck, a, 4,59 


SPEEDY 1090-89, Epson kompat., 100Z/s,v -grafikf. 
GEMINI 10%, Nau mit Textsp., 100 Z/s., 9x9 Mal. 
GEMINI 15X, wie 10X, jedoch bis 375 mm Papierbr. 
ITOH 8510 B, Die Zuverlässigkeit in Person 

JUKI 6100, Typenradgr., 22 Z/s, TA-Typenräder 


DM 998,— 
DM 1198.— 
DM 1475, — 
DM 1495, — 


Compufer-Artikel Nachnahmeversand unfrei, Zwischenverkauf vorbehalten 

Angebote freibleibend unter Anerkennung unserer Lieferbedingungen. Technische Änderungen vorbehalten. "Apple ısl eingelragenss 
Warenzeichen der Fa Appfe-Computer Inc., Kalifornien. Ware mit Rückgaberecht, besonders gekennzeichnet, muß frei zurückgeschickt 
warden. "IBM* ist eingetragenes Warenzeichen der Firma IBM GmbH Ffm 


COMPUTER CENTER CONEX 


5650 SOLINGEN 11 Postfach 11 0206-11G 
Telefon (0 21 22) 754.49 


ERICH-WILLI MEYER 


6343 FROHNHAUSEN Postfach 7011 
Telefon (0 27 71) 350 71 


Multi 1/O Board 

Mainboard XT Version, 8 Slots 
Mainboard PC Version, B Slots 

AAM Card für Speicher-Erweilerung 


Alle Leerplatinen werden mit Bestückungsplan geliefert 


Schaltbilder, soweit verfügbar, Lieferung gegen Aufpr 
IBM -- 
Rechner Leergehäuse I. Einbau v. 2 Drives 
Profi-Tastalur, m Kabel ım Gehäuse, ASCIl 
dio wie vor, jedoch deutsche DIN Belegung 
Standard Tastatur, IBM-Look, ASCII 
Netzteil, mil Ventilator, 100 Wait 

to. wie vor jedoch 135 Wall 

Diskeiten Laufwerk. 2x40 Track DS/360 KB 
Harddisk 10MByte, kpl. m. Xabec Controller 


eis 


Gehäusa/Netztella/Tastaturan/Diskdrives 


DM 
DM 
DM 
DM 
DM 
DM 
DM 


395,— 
489,— 
298, — 
298,— 
350,— 
498,— 





DM 3499. — 
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CP/M für Einsteiger 


Dieser Artikel soll Grundkenntnisse 
über die Benutzung des Betriebssy- 
stems CP/M 2.2/2.23 vermitteln. Er rich- 
tet sich nicht nur an diejenigen, die ihre 
ersten Schritte in CP/M machen wollen, 
sondern auch an die Anwender kom- 
merzieller Programme wie WORDSTAR 
und DBASE II oder der CP/M-Dienst- 
programme, z.B. zur Herstellung von 
Sicherheitskopien. 


CP/M wurde 1973 als herstellerunabhän- 
giges Betriebssystem entwickelt. Sein ho- 
hes Alter ist auf der einen Seite der Grund 
für einen erheblichen Mangel an Komfort, 
andererseits steht dem Anwender heute 
ein großes Angebot an Software zur Verfü- 
gung, das auf den Rechnern unterschied- 
lichster Hersteller läuft — vorausgesetzt, 
sie enthalten einen Z80-Prozessor. Um 
CP/M auf dem Apple zu benutzen, ist da- 
her die Anschaffung der sog. „Z80-Soft- 
card“ erforderlich. 


Installierung der Z80-Softcard 

Bei der Installierung dieser Zusatzkarte 
sollten Sie gleich die Belegung der ande- 
ren Slots Ihres Apples überprüfen. CP/M 
erwartet folgende Zuordnung: 
Disk-Controller: Unbedingt in Slot 6, wei- 
tere Laufwerke können an Slot 5 und 4 
angeschlossen werden. 
Drucker-Interface: Grundsätzlich in Slot 1, 
eventuell auch 2. 

Videokarte (80 Z/Z): Slot 3 

Die Z80-Softcard kann an beliebiger Stelle 
eingesteckt werden, allerdings wird Slot 4 
empfohlen. Eine Ausnahme bildet lediglich 
der Steckplatz O0, eine dort befindliche 
16K-Karte wird von CP/M - je nach ge- 
wählter Version — mitbenutzt. 


Erste Annäherung 


Starten von CP/M 2.2 

Zum besseren Verständnis der nun fol- 
genden Beschreibung des Betriebssy- 
stems sollten Sie jetzt an Ihrem Rechner 
Platz nehmen und CP/M starten. Dazu 
müssen Sie lediglich Ihre CP/M-Master- 
disk in das Bootlaufwerk (Slot 6, Drive 1) 
einlegen und den Computer einschalten. 


Ein wichtiger Hinweis: Es gibt (minde- 
stens) drei Varianten der aktuellen CP/M- 
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Version 2.2, von denen nur eine (CP/M 
2.2 44K) auf Geräten mit 48K RAM läuft. 
CP/M 2.2 56K /60K benötigen, wie es 
schon die Bezeichnung vermuten läßt, ei- 
nen vollausgebauten 64K-Speicher, was 
zur Arbeit mit kommerziellen Programmen 
aber auch dringend empfohlen werden 
muß. 


Nach dem Booten meldet sich CP/M unter 
Angabe der genauen Versionsbezeich- 
nung (z.B. CP/M 2.23 60K ...) mit dem 
sog. Prompt „A>". CP/M erwartet jetzt 
von Ihnen die Eingabe einer Anweisung; 
der Buchstabe im Prompt gibt dabei das 
Bezugslaufwerk an (Wir kommen gleich 
noch darauf zurück, was es damit auf sich 
hat). 

Unter CP/M werden übrigens alle Lauf- 
werke mit Buchstaben bezeichnet; es gilt 
dabei folgende Laufwerkszuordnung: 

A: Slot 6, Drive 1 

B: Slot 6, Drive 2 

C: Slot 5, Drive 1 

D: Siot 5, Drive 2 


DIR — Ausgabe des Directory 

Tippen Sie jetzt einmal den Befehl „DIR“ 
ein. Diese Anweisung muß wie fast alle 
CP/M-Kommandos mit Betätigung der 
<RETURN>-Taste abgeschlossen wer- 
den. Der Rechner gibt Ihnen nun das In- 
haltsverzeichnis (englisch: DlRectory), 
und zwar das vom Drive A:, dem derzeiti- 
gen Bezugslaufwerk, aus. 

CP/M wird alle Ihre Befehle auf dieses 
Laufwerk beziehen, solange diese keine 
Laufwerksangabe (Kennbuchstabe und 
„.) enthalten. Wollen Sie also das DIRec- 
tory einer Disk im Drive B: betrachten, 
müssen Sie „DIR B:“ benutzen. 

Es gibt noch eine Alternative: Sie können 
dem Rechner mitteilen, daß ein anderes 
Bezugslaufwerk verwendet werden soll. 
Geben Sie einfach den entsprechenden 
Laufwerkskenner ein, beispielsweise 
„B:<RETURN>*. Es erscheint als Prompt 
„B>". Der Befehl „DIR <RETURN>“ 
zeigt jetzt den Inhalt der Disk B: an. Mit 
„A:<RETURN>" gelangen Sie wieder in 
die Ausgangsstellung zurück. (Falls Sie 
noch keine zweite CP/M-Disk haben, soll- 
ten Sie das hier Gesagte noch nicht aus- 
probieren, da der Versuch, auf ein Lauf- 
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werk zu wechseln, das keine lesbare Disk 
enthält, i.d.R. zum „Absturz“ des Be- 
triebssystems führt. Sie müssen dann den 
Rechner abschalten!) 


Dateien und Dateinamen 

Zunächst wollen wir uns noch einmal nä- 
her mit dem DlIRectory befassen: Dieses 
Inhaltsverzeichnis gibt die Namen aller auf 
der Diskette befindlichen Dateien (engl.: 
Files) aus. Wie Sie selber schnell feststel- 
len können, sind diese Filenamen alle ähn- 
lich aufgebaut: ein bis zu acht Buchstaben 
umfassender eigentlicher Name, gefolgt 
von einem „.“ und einer sog. „Filetype“- 
Angabe, die im Regelfall grundsätzliche 
Aussagen über den Inhalt einer Datei zu- 
laßt. So kennzeichnet z.B. „.BAS" ein Ba- 
sic-Programm, „.TXT" einen gespeicher- 
ten Text und „.COM" einen Command- 
File. Was verbirgt sich nun hinter dieser 
letztgenannten Bezeichnung? 

Ein Command-File enthält ein ausführba- 
res Programm, das von CP/M aus gestar- 
tet werden kann. So gibt es z.B. auf der 
CP/M-Masterdisk „COPY.COM", eine 
Utility (Hilfsprogramm) zum Kopieren gan- 
zer Disketten. Es wird insbesondere benö- 
tigt, um Sicherheitskopien von Datendisks 
oder Programmen anzufertigen, was übri- 
gens nicht nur für kommerzielle Compu- 
terbenutzer ratsam ist. 


COPY - Kopieren ganzer Disketten 

Der Befehl zum Starten eines solchen 
Programms hat im wesentlichen die Form 
„Laufwerk:Programmname ...weitere An- 
gaben...“. Betrachten wir nun — um kon- 
kret zu werden — den Fall, daß Sie eine 
Kopie (engl.: Backup) ihrer CP/M-Master- 
disk, die jetzt in Drive A: liegt (davon sind 
wir ja ausgegangen) machen wollen. Le- 
gen Sie eine leere Diskette in Drive B: ein 
und geben Sie „COPY B:=A: <RE- 
TURN>" ein, 

(Falls Sie als Bezugslaufwerk Disk B: ge- 
wählt haben — Sie erkennen das am 
Prompt „B>“ - müssen Sie das Kopier- 
programm mit „A:COPY B:=A: <RE- 
TURN" starten, um dem Rechner mitzu- 
teilen, daß er „COPY,COM" im Laufwerk 
A: findet. Tun Sie das nicht, wird Sie CP/M 
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mit der Meldung „COPY?“ darauf hinwei- 
sen, daß es den entsprechenden File nicht 
gefunden hat.) 

Das Kopierprogramm wird sich dann mit 
einer Überschrift (APPLE II CP/M/16 
SECTOR DISK COPY PROGRAM) mel- 
den und Sie auffordern, das Original 
(engl.: MASTER) in Laufwerk A: und die 
Zieldiskette (SLAVE) in Drive B: einzule- 
gen. Vergewissern Sie sich nochmals, ob 
Original und Duplikat in den richtigen Lauf- 
werken liegen und drücken Sie <RE- 
TURN> zum Starten des Kopiervorgan- 
ges. Sobald dieser beendet ist, werden 
Sie gefragt, ob Sie eine weitere Kopie 
anfertigen wollen. Bei negativer Antwort 
fordert Sie der Rechner zum Einlegen der 
CP/M Masterdisk in Drive A: auf — In unse- 
rem speziellen Fall sollte das ja erfüllt sein. 
Einige Bemerkungen sind zum Kopiervor- 
gang noch zu machen: 

Der allgemeine Befehl zum Starten des 
Kopierprogramms lautet „COPY Ziellauf- 
werk:=Originallaufwerk: /Parameter“. Sie 
können dabei auch Kopien unter Benut- 
zung nur eines Laufwerks anfertigen (z.B. 
„COPY A:=A:"). Das Programm fordert 
Sie dann entsprechend zum Disketten- 
wechseln auf. Eine weitere Form dieses 
Kommandos ermöglicht es Ihnen, nur das 
Betriebssystem CP/M zu kopieren: „CO- 
PY B:=A: /S". Wir werden später darauf 
zurückkommen. 


FORMAT - Formatieren von Disketten 

Es gibt Versionen des COPY-Programms, 
die nicht in der Lage sind, auf unbenutzte 
Disketten zu kopieren. Diese müssen 
dann vorher erst entsprechend hergerich- 
tet (formatiert) werden. 

Dafür ist die FORMAT-Utility zuständig. 
Dieses Programm befindet sich ebenfalls 
auf der CP/M-Masterdisk und wird mit 
„FORMAT Laufwerk: <RETURN>" ge- 
startet. Legen Sie also z.B. eine neue Dis- 
kette in Drive B: ein und tippen Sie „FOR- 
MAT B: <RETURN>*. Überprüfen Sie, ob 
die zu formatierende Disk tatsächlich der 
Aufforderung des Programms entspre- 
chend eingelegt wurde, und betätigen Sie 
die <RETURN>-Taste zum Start des For- 
matiervorganges. Nach dessen Beendi- 
gung haben Sie eine leere Diskette zur 
Verfügung, auf die Sie jetzt Dateien kopie- 
ren können. Überzeugen Sie sich selbst 
(„DIR B:“, s.o.)! Selbstverständlich kann 
die leere Disk auch zur Datenspeicherung 
für Programme wie WORDSTAR oder 
DBASE benutzt werden. Wollen Sie sie 
allerdings als Bootdisk zum Starten des 
CP/M-Systems verwenden, müssen Sie 
noch mit „COPY B:=AY/S <RETURN>" 
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das Betriebssystem auf Ihre neue Disk 
Kopieren. 


Das COPY- sowie das FORMAT-Pro- 
gramm benutzen folgende Fehlermel- 
dungen: 

DISK WRITE PROTECTED: Die Schreib- 
schutzkerbe auf der rechten Diskettensei- 
te ist überklebt. 

DISK I/O-ERROR: Die Diskette ist defekt 
oder - falls es die Zieldiskette ist — nicht 
formatiert (s.o.). 

COMMAND ERROR: Sie haben beim Start 
des Programms einen Fehler gemacht, 
z.B. „COPYB=A" anstatt „COPY B:=A:" 
geschrieben. 


Am besten fertigen Sie sich jetzt noch eine 
weitere Kopie der CP/M-Masterdisk an, 
damit Sie eine Möglichkeit haben, die Be- 
nutzung der im folgenden erklärten Befeh- 
le zu üben. Es geht dabei um die sog. 
„Built-In Commands“. 


„Eingebaute Befehle“ 


Befehle, die sozusagen in das Betriebssy- 
stem „eingebaut“ sind, werden als Built-In 
Commands bezeichnet (Der Gegensatz 
dazu sind die „Transient Commands“ wie 
der oben erwähnte „FORMAT“ -Befehl, zu 
dessen Ausführung ein Hilfsprogramm 
von der Masterdisk geladen werden mußB- 
te. Die eingebauten Befehle dagegen 
funktionieren immer, egal, welche Diskette 
eingelegt ist). Das erste „Built-In Com- 
mand“ haben Sie übrigens schon kennen- 
gelernt; es war der DIR-Befehl zur Anzei- 
ge des Inhaltsverzeichnisses. 


ERA - Löschen von Dateien 

Zum Löschen von Dateien dient der ERA- 
Befehl. Er hat die allgemeine Form „ERÄ 
Filename.Filetyp <RETURN>", also 2.B. 
„ERA COPY.COM <RETURN>" oder 
„ERA B:ED.COM <RETURN>*"|. 

Nun kann es sein, daß Sie mehr als nur 
einen File löschen wollen, z.B. alle Dateien 
vom Typ „.TXT". Für diesen Zweck gibt es 
sog. Wildcard-Zeichen. So löscht der Be- 
fehl „ERA B:#*.BAS" alle Basic-Program- 
me auf der Disk B:; „ERA KUNDEN.x“ 
entfernt alle Dateien, die mit „KUNDEN“ 
beginnen (KUNDEN,TXT, KUNDEN.DAT 
usw.) und mit „ERA C:x*.*" räumen Sie 
die gesamte Diskette im Laufwerk C: leer! 
Am besten probieren Sie dies alles einmal 
aus — aber bitte nur auf einer der vorhin 
angefertigten Kopien! 


REN - Ändern von Dateinamen 
Manchmal erscheint es sinnvoll, einen Da- 
teinamen zu ändern. Das ist mit Hilfe des 


REN-Kommandos (engl.: REName umbe- 
nennen) kein Problem. Hier lautet die all- 
gemeine Form „REN neuer Name = alter 
Name <RETURN>"; so wird mit dem Be- 
fehl „REN KOPIE.COM = COPY.COM“ 
der Name des schon bekannten Kopier- 
programms in KOPIE.COM umgewandelt. 
Probieren Sie auch dies und überzeugen 
Sie sich mit Hilfe des DIR-Befehls von der 
Wirkung. (Wenn Sie diese neu benannte 
Utility benutzen wollen, müssen Sie natür- 
lich z.B. „KOPIE B:=A: <RETURN>“ 
eingeben!) 

Zwei weitere, eingebaute Befehle, die 
aber keine große Bedeutung haben, sind 
der USER-Befehl, mit dem eine Diskette in 
verschiedene Benutzerbereiche aufge- 
trennt werden kann, und das TYPE-Kom- 
mando. Mit dem letztgenannten ist es 
möglich, den Inhalt einer Datei auf dem 
Bildschirm oder Drucker auszugeben (z.B. 
TYPE DEMO.TXT <RETURN>). Sie soll- 
ten diesen Befehl aber nur auf Files an- 
wenden, die Texte enthalten, keineswegs 
aber auf Programme wie COPY.COM, da 
sonst die merkwürdigsten Dinge gesche- 
hen könnten. 


!P- Einschalten des Druckers 
Sicherlich haben Sie sich schon gefragt, 
wie man z.B. ein Inhaltsverzeichnis aus- 
drucken kann: Das Ein- und Ausschalten 
des Druckers geschieht durch die Eingabe 
von „FP<RETURN>" (TP steht dabei 
für Otrl-P). 

Die Befehlsfolge „ | P<RETURN> DIR B: 
<RETURN> ? P<RETURN>" beispiels- 
weise druckt ein Inhaltsverzeichnis der 
Disk B: und schaltet danach den Printer 
wieder ab. 


... Noch mehr Control-Zeichen 

Lassen Sie uns in diesem Zusammenhang 
noch auf einige weitere Control-Zeichen 
und ihre Bedeutung eingehen: 

Da sind zunächst einmal Steuerzeichen 
für die Ein- und Ausgabe: 

Ctrl-H: (<--) Cursor eine Spalte zurück 
Otrl-X: Gesamte eingegebene Zeile lö- 
schen 

Ctrl-S: Stoppen der Ausgabe auf Bild- 
schirm / Drucker 

Ctrl-P: Drucker an/aus (Ss.O.) 

Es gibt noch einige andere, die aber von 
geringerer Bedeutung sind und deshalb 
hier nicht aufgeführt werden sollen. Um 
die Betrachtung des Ctrl-C Befehls kom- 
men wir jedoch nicht herum: 


!C - Warmstart des CP/M 


Die Eingabe von „TC“ am Beginn einer 
Zeile verursacht — wie auch die Betätigung 
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der Resettaste — einen sogenannten 
Warmstart; das CP/M-Betriebssystem 
wird neu initialisiert. Im Prinzip bleiben da- 
bei alle Daten im Speicher unversehrt, sie 
sind jedoch im allgemeinen nicht mehr 
„erreichbar“. 

Ein wichtiger Hinweis: Falls bei einem der- 
artigen Warmstart in dem Bootlaufwerk ei- 
ne Diskette mit einer anderen CP/M-Ver- 
sion liegt als zum Beginn Ihrer Arbeit, 
„stürzt das System ab“. Aus diesem 
Grunde sollten Sie dafür sorgen, daß auf 
allen Disketten dieselbe CP/M-Variante 
(z.B. 2.23/60K) vorhanden ist. Zur Erinne- 
rung: Das Betriebssystem wird z.B. mit 
„COPY B:=A:/S" kopiert. 

Der Ctrl-C Befehl (?C) hat zwei Funk- 
tionen: 

Erstens können Sie damit viele Program- 
me abbrechen (z.B. COPY, FORMAT) und 
auf die CP/M-Kommandoebene (A>) zu- 
rückkehren. Bei Datenverarbeitungspro- 
grammen u.ä. jedoch kann diese Methode 
nicht empfohlen werden, da bei einer der- 
artigen Beendigung oftmals nicht alle Da- 
ten korrekt abgespeichert werden! 
Zweitens müssen Sie immer dann Ctrl-C 
eingeben, wenn Sie mit dem Betriebssy- 
stem arbeiten und Disketten gewechselt 
haben. Tun Sie dies nicht, wird sich der 
Rechner weigern, auf die neu eingelegte 
Disk zu schreiben. Grundsätzlich sollten 
Sie sich auch daran gewöhnen, bei kom- 
merziellen Programmen nur dann Disket- 
ten zu wechseln, wenn der Computer Sie 
dazu auffordert, da Sie sonst wirklich in 
„Teufel’s Küche“ kommen können. (Der 
Autor dieses Artikels verdankt einem ver- 
gessenen RESET-Befehl im CP/M-MBA- 
SIC -— entspricht dem „FT C" in CP/M - 
den Verlust einer Stunde Programmierar- 
beit!) 

Auch nach einer Fehlermeldung des 
CP/M-Systems (BDOS ERR ON X:) soll- 
ten Sie mit „TC" den Rechner neu 
starten. 

Lassen Sie uns zum Abschluß dieses Ab- 
schnittes über die eingebauten Komman- 
dos noch kurz auf eben diese Fehlermel- 
dungen eingehen. Es gibt insgesamt nur 
drei verschiedene: 

BAD SECTOR — deutet auf eine beschä- 
digte oder nicht formatierte Diskette hin (s. 
FORMAT); 

R/O - (Read Only/ Nur schreiben) besagt, 
daß die eingelegte Disk entweder schreib- 
geschützt ist (Schreibschutzaufkleber ent- 
fernen!) oder neu eingelegt wurde, ohne 
„TC“ einzugegeben; 

SELECT - schließlich gibt an, daß ein an- 
gesprochenes Laufwerk nicht vorhanden 
ist. 
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Weitere Utilities 


Kehren wir nun wieder zu den Utilities 
zurück. Zwei dieser Hilfsprogramme wol- 
len wir noch näher unter die Lupe neh- 
men. Da ist zum einen „STÄAT“, mit des- 
sen Hilfe sich der Benutzer Informationen 
über Ein- und Ausgabeeinheiten sowie 
Dateien geben lassen kann. Nur die letzte- 
re Möglichkeit soll hier vorgestellt werden: 


STAT - „Statistische Daten“ 

Der Befehl „STAT <RETURN>* zeigt den 
Status der eingelegten Disketten — „R/O“ 
steht für schreibgeschützt, „R/W“ heißt 
„Schreiben und Lesen" — sowie den 
freien Speicherplatz in Kilobytes an. Gibt 
man dagegen z.B. „STAT B: <RE- 
TURN>»" ein, erhält man nur die Informa- 
tion über den verfügbaren Speicherraum 
auf der angesprochenen Disk (hier Drive 
BEN 


Wenn man Genaueres über einzelne Da- 
teien wissen will, bietet sich der Aufruf 
„SIAT filename.typ“ an. So erhält man mit 
„STIAT COPY.COM" u.a. Angaben über 
die Länge des COPY-Programms. Das 
STAT-Programm erlaubt es übrigens, die 
oben genannten Wildcard-Characters zu 
benutzen. So listet der Befehl „STAT 
B:*.* <RETURN>" Informationen über 
alle auf der Disk B: enthaltenen Files auf. 
Wenn Sie sich diese Tabelle näher anse- 
hen, werden Sie auch die Spalte ACCess 
(engl.: Zugriff) bemerken. Sie gibt an, ob 
eine Datei nur gelesen (R/O) oder auch 
überschrieben werden darf (R/W). CGP/M 
bietet damit eine Möglichkeit, ein verse- 
hentliches Löschen von Daten zu verhin- 
dern. „Eingeschaltet“ wird dieser Schutz 
mit dem Befehl „STAT filename.filetyp $R/ 
O”, die Rücksetzung erfolgt mit „STAT 
filename.filetyp $R/W". Die Eingabe von 
„STAT TEST.* $R/O" bewirkt also die SI- 
cherung aller Files, deren Name „TEST“ 
ist (also z.B. TEST.COM, TEST.TEXT), ge- 
gen Überschreiben. 


PIP - Kopieren von Dateien 

PIP ist eine Abkürzung für Peripheral Inter- 
change Program. Dieses Programm bietet 
zahlreiche Möglichkeiten, Dateien zu 
transferieren und zu verändern. Umge- 
kehrt proportional dazu ist seine Bedie- 
nungsfreundlichkeit. Wir wollen uns des- 
wegen lediglich mit der Aufgabenstellung 
befassen, die in der Praxis am häufigsten 
vorkommt, dem Kopieren von Dateien von 
einer Diskette zur anderen: 
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Die Lösung dieses simplen Problems in- 
des ist unter CP/M nicht frei von Tücken: 


Lädt man nämlich PIP von der Masterdisk 
und legt danach die Disketten ein, die man 
zum Kopiervorgang benötigt, müßte man 
eigentlich mit „TC“ einen Warmstart 
durchführen, um den Spielregeln von 
CP/M zu genügen (s.o.: Warmstart/Dis- 
kettenwechsel). Dies aber würde zum Ab- 
bruch des Kopierprogramms führen. 

Es gibt zwei Methoden, um diese Schwie- 
rigkeiten zu umgehen: 


Ersten können Sie dafür sorgen, daß ent- 
weder auf der Original- oder Quellendis- 
kette das PIP-Programm vorhanden ist, da 
dann ein etwaiger Diskettenwechsel ent- 
fällt. Dazu muß es sich selbst kopieren, 
z.B. mit der Anweisung „PIP B:=A:PIP- 
‚COM <RETURN>", Durch diesen Befehl 
überträgt sich das auf der Disk A: befindli- 
che PIP-Programm selbst auf die Disk B:. 
Der zweite Weg ist weniger kompliziert, 
unterwirft Sie aber gewissen Beschrän- 
Kungen: Sie betätigen „ TC" und starten 
dann PIP nach untenstehender Anleitung. 
Entnehmen Sie die Masterdisk mit dem 
Kopierprogramm und legen Sie in dassel- 
be Laufwerk Ihre Originaldisk, von der Sie 
kopieren wollen, ein. PIP wird nun ein- 
wandfrei arbeiten, solange Sie nicht versu- 
chen, auch auf die Originaldisk zu schrei- 
ben. Sie können also nur Daten in einer 
Richtung übertragen. 


PIP wird aktiviert durch die Anweisung 
„PIP <RETURN>" und meldet sich mit 
einem „x»“ am linken Bildschirmrand. Die 
allgemeine Form des Kopierbefehls lautet 
„Ziellaufwerk:=Originallaufwerk:Filena- 
me.Filetyp“. Beispielsweise überträgt die 
Anweisung „B:=A:COPY.COM  <RE- 
TURN>" das Programm „COPY“ von der 
Disk A: auf das Laufwerk B:. Will man 
mehrere Dateien gleichzeitig ansprechen, 
kann man auch hier die Wildcards verwen- 
den. So kopiert „A:=B:x*.x*" alle Dateien 
von B: nach A:. 


Noch drei Anmerkungen zu PIP: 


1. Das Programm wird durch die Eingabe 
von „TC“ oder <RETURN> verlassen. 


2. Es ist nicht möglich, Daten von einer 
Diskette auf eine andere unter Benutzung 
nur eines Laufwerkes zu übertragen. 


3. Befindet sich auf der Zieldiskette bereits 
eine Datei gleichen Namens, die nicht 
schreibgeschützt ist, wird sie ohne vorhe- 
rige Warnung überschrieben. 
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CP/M 2.2 Referenztabelle 


® A. LAUFWERKSBEZEICHNUNGEN 


Laufwerke werden durch einen Buchstaben {A...F) mit nach- 
folgendem Doppelpunkt bezeichnet. Beim APPLE gilt folgende 
Zuordnung: 


A: Slot 6, Drive 1 
B: Slot 6, Drive 2 
G: Slot 5, Drive 1 


® B. DATEINAMEN 


Filenamen bestehen aus 1 — 8 Buchstaben (fname), einem Punkt 
sowie einer Filetypangabe (ftyp). 


Die Bedeutung einiger Filetypangaben: 


ASC ASCII-Textfile 

ASM — 8986-Assemblerquelltext 

BAK Sicherheitskopie eines Files (z.B. von WS erzeugt) 
BAS BASIC-Programmdatei 

COM — Direkt ausführbares Programm 

DOC, TXT, TEX, READ.ME — Textdateien 

LIB — Library-Datei 

PAS — Pascal-Programmdatei (z.B. TURBO-Pascal) 

PRN — Assemblerlisting 

$$$ — Unvollständige Files, Arbeitsdateien (WS) usw, 


Filenamen können mit einem Laufwerkskenner d: verbunden 
werden, um Bezug auf ein bestimmtes Laufwerk zu nehmen. 


Bsp,: A:COPY.COM, B:INFO.TAT, C:DEMO.DAT 


Einige CP/M-Kommandos erlauben den Einsatz sog. 
"WILDCARDS", um mehrere Files gleichzeitig anzusprechen. 


* — ersetzt fname oder ftyp (*,COM, *.*, TEXT.«*) 


@® C. ”"BUILD-IN”-KOMMANDOS 


"Eingebaute" Kommandos sind ständig verfügbar. Alle Ein- 
gaben sind mit <RETURN> abzuschließen. 

(Ausnahme Control-Zeichen) 

@® Cl. Bezugslaufwerkswechsel (logged Drive) 

<d:> — wechselt auf Drive d: 

@® C2. TC — Warustart 


fc (Ctrl-C) — initialisiert CP/M neu. 


TC bricht u,U. laufende Programme ab und muß unbedingt bei 
Diskettenwechsel auf Betriebssystemebene eingegeben werden. 


@® C3. Ein-/ Ausgabe-Control-Zeichen 

1% - Zeile löschen 

{H — (<-) letztes Zeichen löschen 

15 — Ausgabe stoppen 

1P — Drucker an/aus 

@® CA. DIR — Anzeige des Inhaltsverzeichnisses 

DIR — Anzeige des DIRectories im Bezugslaufwerk 
DIR d: — dasselbe, nur für Laufwerk d: (z.B.: DIR A:) 


DIR £fname.typ — Anzeige nur bestimmter Namen/ Typen 


Bsp.: DIR A:x.COM 


@® C5. ERA — Löschen von Dateien 


ERA d:fname.ftyp — Löschen der Datei fname.ftyp in Drive d: 
Wildcards erlaubt (ERA »,C0M). 


@ CS. REN — Neubenennen von Dateien 


REN d:neuerfname.ftyp = d:alterfname. ftyp — 
Datei alterfname,ftyp in Drive d: wird in 
neuerfname.ftyp umbenannt, 

Wildcards sind nicht erlaubt. 


@ C7. USER — Umschalten der Benutzerbereiche 


USER n — Schaltet auf Benutzerbereich n (1l...15) um. Nach 
Booten ist Userbereich ® eingeschaltet. 


@® C8. TYPE — Ausgabe einer Datei am Bildschirm / Drucker 


TYPE d: fname,ftyp — Listet eine Datei am Bildschirm oder 
auf dem Drucker (TYPE READ.ME). 


® D. "TRANSIENTE” KOMMANDOS 


Zur Ausführung eines "transienten" Kommandos muß ein ent- 
sprechender File (ftyp: .COM) auf dem Bezugslaufwerk vor- 
handen sein. 


@ D1l. COPY — Kopieren ganzer Disketten 
COPY neuerd:=alterd: — Kopiert gesamte Diskette von Drive 
alterd: nach neuerd:, 


COPY neuerd:=salterd: /S — Kopiert nur das 
CP/M-Betriebssystem 


Je nach Version des CGOPY-Programms kann eine vorherige 
Formatierung notwendig sein, 


@ D2. FORMAT — Formatieren von Disketten 
FORMAT d: — Formatiert Diskette in Drive d!: 
@ D3. STAT — "Statistische" Angaben 
STAT d: — Zeigt freien Speicherplatz auf 

Disk d: an, 

— Zeigt Länge und Status der Datei 
fname,ftyp an. Wildcards erlaubt. 
STAT d:fn.typ $stat — Setzt angesprochene Datei auf Status 

stat: 


stat = R/O ; Datei schreibgeschützt 
R/W ; Datei nicht schreibgesch. 


STAT d: fname. ftyp 


@ DA. PIP — Kopieren von Dateien 


PIP zield:=origd: fname,ftyp — Kopiert Datei fname.ftyp von 
Laufwerk origd: nach zield:. 
Wildcards erlaubt, 


Weitere Aufrufmöglichkeiten der vorgenannten Befehle sowie 
Angaben über andere CP/M 2.2 Anweisungen entnehmen Sie bitte 
den entsprechenden Handbüchern. 
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Teil 3: Die Ein- und Ausgabe 


6. EIN/AUSGABEBEFEHLE 


Nachdem im letzten Teil Funktionen erklärt 
wurden, die mit der Ein-/Ausgabe im Zu- 
sammenhang standen, werden nachfol- 
gend die entsprechenden Befehle vorge- 
stellt. 

Es gibt wie im Applesoft-Basic Befehle, 
die nur eine Datei ansprechen (z.B. den 
Bildschirm), und solche Befehle, mit de- 
nen verschiedene Dateien bearbeitet wer- 
den können (z.B. der Befehl „OPEN“). 


6.1. Tastatur 


Es gibt zwei Befehle, die von der Tastatur 
Zeichen einlesen: 

INPUT; “String“; Variablenliste — Es 
wird wie beim Applesoft-Basic eine Liste 
von Variablen eingelesen. Falls im Befehl 
ein String angegeben ist, wird dieser aus- 
gegeben, anschließend ein Fragezeichen. 
Soll das Fragezeichen unterdrückt wer- 
den, so kann nach dem String auch ein 
Komma stehen. Der Befehl 

INPUT “Name: ",N$ 

gibt also nur den String "Name: “ ohne ein 
Fragezeichen aus. Falls direkt nach dem 
Wort „INPUT“ ein Strichpunkt steht, dann 
wird nach der Eingabe der Variablen kein 
Return ausgegeben. Man kann dann also 
direkt hinter der Eingabe weiter aus- 
drucken. 

LINE INPUT; “String“; Stringvariable - 
Mit diesem Befehl wird eine Stringvariable 
eingelesen. Es wird zunächst der im Be- 
fehl angegebene String ohne ein nachfol- 
gendes Fragezeichen ausgegeben. Dieser 
String kann auch weggelassen werden. 
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Anschließend werden alle Zeichen bis zu 
der Return-Taste in die Stringvariable ein- 
gelesen, mit Kommas und allen Sonder- 
zeichen. Falls direkt nach dem Wort 
„LINE INPUT“ ein Strichpunkt folgt, dann 
wird wie beim „INPUT“ nach der Eingabe 
kein Return ausgegeben. 


6.2. Lautsprecher 


BEEP - Der Lautsprecher piepst einmal. 
Denselben Effekt erreicht man durch den 
Befehl „PRINT CHR$ (7);“. 
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Microsoft Basic leicht 
geMACht 


von Pit Capitain 


Obwohl der Macintosh drei Software-Ton- 
generatoren eingebaut hat, ist dies der 
einzige Basic-Befehl zur Tonerzeugung. 
Die Tongeneratoren können leider nur 
über Maschinensprache benutzt werden. 


6.3. Bildschirm 


CLS — löscht das Ausgabefenster. Dies 
entspricht dem Applesoft-Befehl 
„HOME“. 


PRINT Liste von Ausdrücken — ent- 
spricht dem Applesoft-Befehl „PRINT“. 
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Unterschiede gibt es nur bei der Ausgabe 
von Zahlen: Nach Zahlen wird grundsätz- 
lich ein Leerzeichen ausgegeben, desglei- 
chen vor positiven Zahlen. Vor negativen 
Zahlen steht ein Minuszeichen. Einfach 
genaue Zahlen (vgl. Teil 1 der Serie), die 
mit weniger als 8 Ziffern dargestellt wer- 
den können, werden ohne Hochzahl aus- 
gegeben, z.B. wird 1E-7 als „.0000001“ 
ausgegeben (7 Ziffern), dagegen 1E-8 als 
„iE-08“. Analoges gilt für doppelt genaue 
Zahlen. Hier liegt die Grenze bei 17 Zif- 
fern. 


SPC (I) - gibt | Leerzeichen aus. | muß im 
Bereich -32768 bis 32767 liegen, wobei 
negative Zahlen natürlich kein Leerzei- 
chen erzeugen. Dieser Befehl kann nur in 
einem „PRINT“- oder „LPRINT“-Befehl 
(s.u.) benutzt werden. 

Falls die Zeilenlänge des Bildschirms mit 
dem Befehl „WIDTH" (s.u.) auf W gesetzt 
wurde, werden nur |MOD W Leerzeichen 
ausgegeben. 

Ansonsten (Zeilenlänge auf „unendlich“) 
wird beim ersten Erreichen der Position 
255 durch den „SPC"-Befehl ein Return 
eingefügt! Dies steht im Widerspruch zu 
den Angaben im Handbuch. 


TAB (I) — bewegt den Ausgabezeiger zur 
horizontalen Position I. Falls sich der Aus- 
gabezeiger schon hinter dieser Position 
befindet, wird zu dieser Position in der 
nächsten Zeile gesprungen. | muß im Be- 
reich von -32768 bis 32767 liegen (negati- 
ve Werte entsprechen der Position ganz 





„PRINT"- oder einem „LPRINT"-Befehl 
(s.u.) verwendet werden. Auch hier wird 
bei einer Zeilenlänge von W Zeichen nur 
zur Position | MOD W gesprungen. 


PTAB (Il) - bewegt den Ausgabezeiger 
zum I-ten Pixel (= einzelner Punkt des 
Grafik-Bildschirms). Falls sich der Ausga- 
bezeiger schon hinter dieser Position be- 
findet, so wird — im Unterschied zum Be- 
fehl „TAB“ - zu der Position in derselben 
Zeile zurückgesprungen. | muß im Bereich 
von O0 bis 32767 liegen. Dieser Befehl 
kann nur in einem „PRINT“-Befehl ver- 
wendet werden. 


PRINT USING F$; Liste von Ausdrük- 
ken — gibt die Zahlen und Sirings in der 
angegebenen Liste in einem bestimmten 
Format aus. Dieses Format wird durch den 
ersten String F$ festgelegt. Dieser String 
enthält bestimmte Zeichen, die das Aus- 
gabeformat bestimmen. Es gibt folgende 
Zeichen: 


Zur Formatierung von Strings: 

!— Nur das erste Zeichen eines Strings 
wird ausgegeben. 

\n Leerzeichen\ — Es werden 2 + n 
Zeichen eines Strings ausgegeben. Falls 
der String zu kurz ist, werden Leerzeichen 
ergänzt. 

& — Der String wird unverändert ausge- 
geben. 


Zur Formatierung von Zahlen: 
+# — stellt eine Ziffer dar. Falls die Zahl 








links). Dieser Befehl kann nur in einem weniger Ziffern als gefordert hat, so wer- 
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: WITH 25,7 :W1 
1200 PRINT "linen": 
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WEITE #1, 1, STESUN, 1 
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den vorne Leerzeichen ergänzt. Falls die 
Zahl aber zu lang ist, so wird vor der Zahl 
ein „Yo“ ausgegeben. Zwischen den Zif- 
fer-Zeichen kann ein Dezimalpunkt (,„.“) 
angegeben werden. 

+ - am Anfang bzw. am Ende des Forma- 
tier-Strings bedeutet, daß das Vorzeichen 
einer Zahl (+ oder -) vor bzw. hinter der 
Zahl ausgegeben wird. 

-- am Ende des Formatier-Strings bedeu- 
tet, daß negative Zahlen von einem Minus- 
zeichen gefolgt werden. 

** - am Anfang des Formatier-Strings be- 
deutet, daß bei Zahlen, die weniger Ziffern 
als gefordert haben, Sternchen („x“) an- 
statt Leerzeichen ergänzt werden. 

$$ - Ein Dollar-Zeichen wird vor den for- 
matierten Zahlen ausgegeben. 

*»*$ — Die beiden eben beschriebenen 
Wirkungen werden kombiniert. 

,„ — direkt vor einem Dezimalpunkt bewirkt, 
daß nach Tausender-, Millionen-Ziffern 
usw. ein Komma ausgegeben wird (ameri- 
kanische Notation). 

+77 7 - am Ende einer Ziffernfolge be- 
wirkt, daß eine Zahl im exponentiellen For- 
mat ausgegeben wird. Die vier Pfeile ste- 
hen für die vier Zeichen “"E+xx”, mit de- 
nen der Exponent angegeben wird. 

_ — bewirkt, daß das nächste Zeichen des 
Formatier-Strings direkt ausgegeben wird. 
Beispiele für manche der vielen Formatier- 
Zeichen findet man in der Abb. 1. 


WRITE Liste von Ausdrücken - ähnlich 
wie der Befehl „PRINT“. Die einzelnen 
Ausdrücke werden aber durch Kommas 
getrennt ausgegeben. Strings werden in 
Anführungszeichen eingeschlossen. Vor 
und nach Zahlen wird im Gegensatz zum 
„PRINT“-Befehl kein Leerzeichen ausge- 
geben. Nach dem letzten Ausdruck wird 
ein Return ausgegeben. Z.B. erzeugt der 
Befehl 

WRITE 1,A$,"Test",A,-1 

die folgende Ausgabe (mit A$="Hallo”, 
A=27): 

1,"Hallo*, "Test" ,27,-1 


LIST Zeile1-Zeile2 — öffnet ein Listfenster 
und gibt das Programmlisting ab der Zeile 
mit der Nummer Zeile1 aus. Dies ent- 
spricht fast dem Menü-Befehl „LIST“, der 
jedoch immer den Anfang des Programms 
zeigt. 

Man kann das Listing auch an ein anderes 
Ausgabegerät schicken, indem man an 
den Befehl den Zusatz “, Gerät” anhängt. 
Der Befehl 

LIST 100-999, "COM1:" 

schickt ein Listing der Programmzeilen 
100 bis 999 an die serielle Schnittstelle. 


Peeker 4/85 





6.4. Drucker 


Es gibt einige Befehle, die direkt den 
Drucker ansteuern, ohne daß wie beim 
Applesoft-Basic eine Datei dafür geöffnet 
werden müßte: 

LCOPY - druckt den augenblicklichen 
Bildschirminhalt auf dem Imagewriter aus. 
Die Abb. 1 wurde mit diesem Befehl er- 
zeugt. 

LPRINT und LPRINT USING - entspre- 
chen den Befehlen „PRINT“ und „PRINT 
USING" (s.o.), aber Ausgabe auf dem 
Drucker. 

LLIST Zeile1-Zeile2 — druckt ein Listing 
des im Speicher befindlichen Programms 
mit dem angegebenen Zeilenbereich, Die- 
selbe Wirkung kann man auch mit dem 
Befehl 

LIST Zeile1-Zeile2, "LPT1:“ 

erzielen. 


6.5. Allgemeine Dateien 


In diesem Abschnitt werden solche Befeh- 
le erklärt, mit denen unterschiedliche Da- 
teien bearbeitet werden können. Das 
heißt, daß diese Befehle z.B. Dateien auf 
verschiedenen Disketten oder den Bild- 
schirm, den Drucker usw. ansprechen 
können. Die Bezeichnung von Dateien 
und die Namen von Ein-/Ausgabegeräten 
wurden bereits im Teil 1 der Serie behan- 
delt. 


6.5.1. Arten von Dateien 


Es gibt zwei unterschiedliche Arten, eine 
Datei zu benutzen: 

— man kann entweder Dateien sequentiell 
lesen bzw. beschreiben, d.h. immer ein 
Zeichen nach dem anderen, oder 

- man kann an ganz bestimmten Stellen 
auf eine Datei zugreifen, ohne eine be- 
stimmte Reihenfolge einhalten zu müssen 
(wahlfreier Zugriff, Random Access). Die 
Datei ist dazu in mehrere gleichlange „Fel- 
der“ aufgeteilt, die numeriert sind, Man 
kann nun wahlweise auf das Feld mit einer 
beliebigen Nummer zugreifen. 

In diesem Zusammenhang spricht man 
dann auch von sequentiellen Dateien bzw. 
von Random-Access-Dateien. Diese Un- 
terscheidung gibt es auch beim Apple- 
DOS. Sie wird bei den nächsten Abschnit- 
ten immer wieder auftauchen. 


6.5.2. Allgemeine Dateibefehle 


Dateien werden mit dem Befehl „OPEN“ 
geöffnet. Diesen Befehl kann man auf zwei 
verschiedene Arten schreiben. Die erste 
Möglichkeit ist: 
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OPEN Modus, #N, Name, Länge — öffnet 

die Datei mit dem angegebenen Namen 

unter der Dateinummer N. Modus ist ein 

String, dessen erster Buchstabe die Art 

der Datei angibt: 

“R” - Random-Access-Datei, 

Ausgabe 

— sequentielle Eingabedatei 

“0” - sequentielle Ausgabedatei 

"A" - sequentielle Ausgabedatei. Der Da- 
teizeiger steht aber am Ende der 
Datei. Dadurch wird also an die Da- 
tei etwas angehängt (Append). 

Bei Random-Access-Dateien kann ange- 

geben werden, wie lang die einzelnen Fel- 

der sind. Falls diese Angabe weggelassen 

wird, nimmt das Microsoft-Basic eine Län- 

ge von 128 Bytes an. 

Die zweite Art des „OPEN"-Befehls hat 

eine andere (etwas besser lesbare) 

Syntax: 


Ein- oder 


= 


OPEN Name FOR Modus AS #N LEN- 
=Länge - Die Datei mit dem angegebe- 
nen Namen wird unter der Dateinummer N 
geöffnet. Modus ist eines der folgenden 
Wörter: 


INPUT — sequentielle Eingabedatei 
OUTPUT — sequentielle Ausgabedatei 
APPEND - sequentielle Ausgabedatei. 
Der Dateizeiger steht aber am Ende der 
Datei. 


Falls der Ausdruck „FOR Modus“ wegge- 
lassen wird, handelt es sich um eine Ran- 
dom-Access-Datei. In diesem Fall kann 
die Länge der einzelnen Felder angege- 
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ben werden. Bei fehlender Angabe wird 
die Länge 128 angenommen. 

CLOSE #N1,+#N2.,... — schließt die ange- 
gebenen Dateien. Falls keine Dateinum- 
mer angegeben ist, werden alle offenen 
Dateien geschlossen. 


RESET - schließt ebenfalls alle offenen 
Dateien. Der Unterschied zum „CLOSE“- 
Befehl besteht darin, daß zusätzlich das 
neue Disketteninhaltsverzeichnis auf Dis- 
Kette geschrieben wird. 

Bei „CLOSE“ wird das Inhaltsverzeichnis 
nur im Speicher auf den neuesten Stand 
gebracht, nicht aber auf der Diskette. Das 
kann bei einem Stromausfall oder z.B. bei 
Maschinensprache-Experimenten die Fol- 
ge haben, daß das Inhaltsverzeichnis einer 
Diskette nicht mit ihrem Inhalt überein- 
stimmt. 

FILES Name - gibt an, ob sich eine Datei 
mit dem angegebenen Namen auf Disket- 
te befindet. In diesem Fall wird der Name 
der Datei im Ausgabefenster angegeben, 
anderenfalls wird die Fehlermeldung 
„FILE NOT FOUND" erzeugt. 

Falls kein Name hinter dem Befehl ange- 
geben ist, werden die Namen von allen auf 
Diskette befindlichen Dateien im Äusga- 
befenster ausgegeben. 

KILL Name — löscht die angegebene 
Datei. 

NAME Alt AS Neu - Ändert den Namen 
einer Disketten-Datei. Der alte Name muß 
existieren, der neue Name darf nicht 
schon einmal vorkommen, ansonsten wird 
ein Fehler erzeugt. 


Abb. 3 


7 





\ Schreiben beendet 1 | PEM 

alffnen I Ni="Random-Datei” I 
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, & IFF THEN PRINT "mit" ELSE PRINT "ohne" |. 
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Bei Random-Access-Dateien besteht die 
Möglichkeit, die Felder, in die die Datei 
aufgeteilt ist, zu „formatieren“. Dies geht 
mit dem folgenden Befehl: 

FIELD #N, Bi AS S1$, B2 AS S2$, ... - 
Dieser Befehl formatiert die Felder einer 
geöffneten Datei (Nummer N) wie folgt: 
Die ersten Bi Zeichen können unter dem 
Namen Si$ bearbeitet werden, die näch- 
sten B2 Zeichen unter dem Namen S2$, 
USW. 

Beispiele für die Verwendung dieser Be- 
fehle sieht man in Abb. 2 und Abb. 3. 
Diese Programme schreiben zunächst 
Zahlen und Strings auf eine Datei. Danach 
wird die Datei wieder gelesen und die 
Daten werden auf ihre Korrektheit hin 
überprüft. In Abb. 2 wird eine sequentielle 
Datei, in Abb. 3 eine Random-Access- 
Datei verwendet. 


6.5.3. Eingabe 


INPUT =#N, Variablenliste - liest die an- 
gegebenen Variablen von der geöffneten 
Datei mit der Nummer N ein. 

LINE INPUT #N, Stringvariable — liest 
eine Zeile von der Datei mit der Nummer N 
in die angegebene Stringvariable ein (wie 
bei dem Befehl „LINE INPUT“, s.o.). Dies 
kann z.B. dazu benutzt werden, um ein im 
ASCII-Format gespeichertes Basic-Pro- 
gramm von einem anderen Programm aus 
einzulesen. 

GET #N, R- liest das Feld Nummer R von 
der Random-Access-Datei mit der Num- 
mer N in den Speicher. Falls R nicht ange- 
geben ist, wird das nächste Feld (nach 
dem letzten „GET“) eingelesen. Nach die- 
sem Befehl können u.a. mit den beiden 
vorigen Befehlen Daten aus dem Feld ein- 
gelesen werden, aber auch über die 
Stringvariablen in einem „FIELD“-Befehl. 
Beispiele zu diesen Befehlen sieht man in 
den Abb. 2 und 3. 


6.5.4. Ausgabe 


WIDTH Gerät, W, T oder 

WIDTH #N, W, T - legt die Zeilenlange 
und Tabulator-Positionen des Ausgabege- 
rätes bzw. der Ausgabedatei fest. 

W ist die Länge der Zeilen. Nach W Zei- 
chen fügt Microsoft-Basic ein Return ein. 
Falls W den Wert 255 hat, so wird die 
Zeilenlänge auf „unendlich“ gesetzt, d.h. 
es wird nirgends innerhalb von Zeilen ein 
Return eingefügt (man beachte aber die 
obige Anmerkung zum Befehl „SPC”). 
Tabulatoren werden alle T Zeichen ge- 
setzt. Zu diesen Marken wird zum Beispiel 
gesprungen, wenn in einer „PRINT”-An- 
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weisung ein Komma zwischen zwei Aus- 
drücken steht, also beispielsweise bei 
PRINT A, B,. 


PRINT #N, Ausdrücke - entspricht 
„PRINT“, wobei aber auf die Datei mit der 
Nummer N geschrieben wird. 

PRINT #N, USING F$; Ausdrücke — wie 
„PRINT USING F$"; es wird aber auf die 
Datei mit der Nummer N geschrieben. 
WRITE #N, Ausdrücke - wie „WRITE”; 
es wird aber auf die Datei mit der Nummer 
N geschrieben, Dies ist recht nützlich, da 
die Ausdrücke, die dadurch auf die Datei 
geschrieben werden, später mit dem „IN- 
PUT #“-Befehl wieder eingelesen werden 
können, da sie schon voneinander durch 
Kommas usw. getrennt sind. 


Für Random-Access-Dateien gibt es noch 
mehr Befehle: 

PUT #N, R- Gegenstück zum „GET #"- 
Befehl (s.o.). Es wird also ein Feld, das 
vorher mit „PRINT #“, „WRITE #" oder 
mit den beiden nachfolgenden Befehlen 
gefüllt wurde, auf die Datei mit der Num- 
mer N geschrieben, und zwar an die Stelle 
mit der Nummer R. 

LSET S$ = Stringausdruck und 

RSET S$ = Stringausdruck - setzt den 
angegebenen Stringausdruck in das Feld 
einer Random-Access-Datel ein, und zwar 
an der Stelle, die in einem „FIELD“-Befehl 
(s.0.) der Variablen S$ zugeordnet wurde. 
Mit „LSET" wird der Stringausdruck links- 
bündig, mit „RSET" rechtsbündig einge- 
setzt, wobei eventuell Leerzeichen er- 
gänzt werden. Dies kann auch unabhängig 
von Dateien benutzt werden, z.B.: 
A$=SPACE$(20) : RSET A$=N$ 

Diese beiden Befehle haben zur Folge, 
daß in dem String A$ (durch den ersten 
Befehl 20 Zeichen lang) der String N$ 
rechtsbündig eingefügt wird (zweiter Be- 
fehl). 

Falls man nicht Strings, sondern Zahlen in 
ein formatiertes Feld einsetzen will, muß 
man die Funktionen „CVI", „CVS“, 
„CVD“, „MKI$“, „MKS$" oder „MKD$“ 
verwenden (s, Teil 2 der Serie). 

Beispiele zu diesen Befehlen sind in den 
Abb. 2 und 3 zu sehen. 

Um das im Speicher befindliche Pro- 
gramm auf eine Datei zu schreiben, gibt es 
noch den Befehl 

SAVE Name - schreibt das Programm aus 
dem Speicher auf die Datei mit dem ange- 
gebenen Namen, und zwar im binären 
Format. 

Um das Format zu ändern, können an den 
Befehl noch die folgenden Zusätze ange- 
hängt werden: 


‚A - ASCII-Format 

‚P - geschütztes Format (Protected). 
SAVE "Prog1",A speichert also das Pro- 
gramm unter dem Namen “Prog1“ im 
ASCII-Format ab. 

Falls kein Name angegeben wird, so er- 
scheint ein Dialogfenster, in dem der Be- 
nutzer den Dateinamen und das Format 
festlegen kann (s. Teil 1 der Serie). 


Redaktioneller Hinweis: Inzwischen ist 
die Version 2.0 Microsoft-Basic bei uns 
eingegangen. Da diese Neuversion stark 
geändert wurde (Full-Screen-Editor, Zel- 
lennummern fakultativ usw.), standen wir 
vor dem Problem, ob wir die bereits vorlie- 
gende Serie zur Version 1.0 bzw. 1.1 ab- 
schließen sollten. Um Verwirrungen zu 
vermeiden, haben wir uns dazu entschlos- 
sen, die Aufsatzfolge in der bisherigen 
Form zu Ende zu führen. Da der Macintosh 
leider noch nicht völlig „ausgegoren" ist, 
werden sich Mac-Besitzer daran gewöh- 
nen müssen, daß an den Mac-Program- 
men ständig gefeilt wird. Der Umstand, 
daß selbst ein so weltweit renommiertes 
Software-Haus wie Microsoft mit der Im- 
plementierung von Basic und Multiplan auf 
dem Mac sichtliche Schwierigkeiten hatte, 
läßt erahnen, wie es erst den kleineren 
Software-Häusern mit diesem eigenwilli- 
gen Gerät ergehen wird. Wer einen Macin- 
tosh erwirbt, muß wissen, daß von be- 
stimmten Programmen in kürzeren Ab- 
ständen, als dies bei anderen Computern 
der Fall ist, Neuversionen erscheinen wer- 
den. Wem dies zu teuer ist, muß bei einer 
Altversion bleiben, so daß die Fortführung 
der Serie von daher ihre Berechtigung hat. 
In den USA kostet der Umtausch von Mi- 
crosoft-Basic ca. $ 50.00. 
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Zukunft 


Orgasoft wurde 1980 als GmbH gegrün- 
det, deren beide Gesellschafter Klaus M. 
Dargel und Jürgen Hartwich mit je 50 % 
beteiligt sind. Der Vorläufer der Firma wur- 
de im Jahre 1977 durch Jürgen Hartwich 
ins Leben gerufen, und zwar als Bera- 
tungsfirma für Materialfluß und Büroorga- 
nisation. 

Seit 1980 ist Orgasoft Apple-Vertrags- 
händler. Im Jahr 1984 wurde zusätzlich 
der Mikrocomputer Schneider CPC 464 
ins Programm aufgenommen, um die Pro- 
duktpalette nach unten abzurunden. Der 
Firmensitz ist in 7732 Niedereschach. Ein 
Verkaufsbüro befand sich seit 1. 1. 1983 in 
7730 Villingen-Schwenningen. 


Ladengeschäft: Jetzt am 23. Februar 
wurde dann das neue Verkaufsbüro in der 
Villinger Innenstadt mit angeschlossenem 
Computer-Shop eröffnet. Auf 150 qm Bü- 
ro- und Ladenfläche wird die gesamte Ap- 
ple-Produktpalette, der Schneider CPC 
464 und ein umfangreiches Peripherie- 
Angebot von Plattenspeichern, Druckern 
usw. geführt. Orgasoft ist ein Level-1-Ser- 
vice-Center mit eigener Reparatur-Abtei- 
lung und hat 7 Mitarbeiter sowie einige 
freiberufliche Programmierer. In dem re- 
novierten Altstadthaus werden in einer ge- 
schmackvollen Ladeneinrichtung weiter- 
hin Zubehör sowie ein breites Sortiment 
an Fachbüchern und Fachzeitschriften an- 
geboten. Der Kundenkreis setzt sich aus 
Privatpersonen, Klein- und Mittelbetrie- 
ben, Schulen und einigen Firmen der 
Großindustrie zusammen. Für das gesam- 
te Produktprogramm von Apple und 
Schneider werden Abdeckhauben in eige- 
ner Regie hergestellt und an Endkunden 
sowie über das Händlernetz vertrieben. 


Exportgeschäft: Nachdem Orgasoft sich 
schon seit 3 Jahren mit dem Export nach 
Tunesien befaßt und dort bereits zahlrei- 
che Firmen mit Apple-Computern sowie 
mit französischsprachiger Software aus- 
gestattet hat, ist man derzeit dabei, eine 
„Orgasoft Tunisie“ zu gründen. Für den 
Export ist Geschäftsführer Jürgen Hart- 
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wich zuständig. U.a. wurden die deut- 
schen Auslandshandeiskammern in Tune- 
sien und Ecuador mit Apple-Rechnern und 
spezieller Software ausgestattet. 


Software-Entwicklung: Die Firma Orga- 

soft gehört zu den ganz wenigen Apple- 

Händlern mit einer eigenen Software-Ab- 

teilung, die Eigenentwicklungen und kun- 

denspezifische Programme für Apple- 

Computer erstellt. Ca. 80 % der vertriebe- 

nen Software sind Eigenprodukte. Von 

einigen Fremdprogrammen wurden Lizen- 

zen erworben. 

Die Firma Orgasoft verfügt inzwischen 

über eine große Software-Palette, die an 

Endabnehmer und über das Händlernetz 

vertrieben wird, z.B. folgende Branchen- 

lösungen: 

— Reisebüro 

— Autovermietung 

— Verwaltung von Palettenlägern 

— Anschluß von Wägesystemen an Apple- 
Computer 

— Lohn und Gehalt 

— Fakturierung 

— Finanzbuchhaltung 

— Immobilienmakler 

— Baukalkulation 

Das Fakturierungsprogramm läßt sich mit 
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Selbstverständlich wird auch Software der 





großen, internationalen Softwarehäuser 
angeboten. Wie sich anläßlich der Eröff- 
nung des Computer-Shops zeigte, ist Or- 
gasoft immer gut für neue Marketing- 
Ideen. In den regelmäßig erscheinenden 
Orgasoft-News wird das Händlernetz über 
Aktionen, so z.B. über den Software-Kof- 
fer, bestehend aus einem Marken-Akten- 
koffer mit 4 kompletten Programmpaketen 
als Händler-Demo, unterrichtet. Ferner 
werden auch herstellerneutrale Beratun- 
gen auf dem Sektor Materialfluß sowie 
Büroorganisation und EDV-Einführungen 
durchgeführt. 


6/7 


Auf dem Abstellgleis: 


Steve Wozniak 


In der amerikanischen Zeitschrift 
„Byte“ erscheint seit Dezember 
1984 eine mehrteilige „Apple Sto- 
ry“ in Form eines Interviews mit 
Steve Wozniak. Obgleich substan- 
tiell nichts Neues gebracht wird, 
denn Apples Aufstieg von der Ga- 
ragenfirma bis zum Weltkonzern ist 
ja wohl jedem bekannt, überra- 
schen doch die resignierenden Tö- 
ne, die Wozniak insbesondere im 
Januar-Heft der „Byte“, S. 167 an- 
schlägt. Insider kann dies aller- 
dings nicht mehr erstaunen, denn 
schon seit langem ist bekannt, daß 
Steve Wozniak nur noch ein Au- 
Benseiter, quasi ein „Odd-man- 
out" ist, also eine Figur, die nicht 
mehr in das Puzzle paßt. 


— Wäre es nach Wozniak gegan- 
gen, dann würden Apple-Clubs 
wie CALL APPLE in den USA oder 
AUGE in Deutschland nicht von 
Apple ignoriert oder gar mit Füßen 
getreten. 

— Wäre es nach Wozniak gegan- 
gen, dann hätte man beim Apple Ill 
und bei der Lisa weniger Geheim- 
niskrämerei betrieben (und wahr- 
scheinlich wären dann auch beide 
Projekte nicht „in die Hose ge- 
gangen“), 

- Wäre es nach Wozniak gegan- 
gen, dann hätte man den Quell- 
code der Betriebssysteme SOS 
(für Apple Ill} und ProDOÖS für 
Apple Il} publik gemacht. (Woz- 
niak: „It's the greatest ihing in the 
world, but | wish we gave out li- 
stings of it .. We made it very 
difficult for outside developers in- 
stead of providing all the informa- 
tion ..." Byte: „Has that atütude 
changed now?" Wozniak: „No. It's 
still the most negative thing in our 


whole company, and it will be for 
years.“). 


Bei Apple richtet man sich jedoch 
de facto schon lange nicht mehr 
nach Wozniak, Als ich in Verbin- 
dung mit meinem Buch „Apple 
ProDOS für Aufsteiger", das übri- 
gens im Mai 1934 noch vor den 
ersten amerikanischen ProDOS- 
Publikationen erschien, einen dis- 
assemblierten Quellcode von 
ProDOS ankündigte, erhielt ich so- 
fort eine Abmahnung der Rechts- 
anwaliskanzlei Strobl, Killius & 
Vorbrugg in München, die die Fir- 
ma Apple Computer GmbH mit der 
klaren Order vertritt, jeden abzu- 
mahnen, der in einen Apfel beißt, 
egal ob frisch oder faul. Daß der 
ProDOS-Quellcode letztlich nicht 
erschien, lag indes weniger an der 
Einschüchterung denn an meiner 
zu knapp bemessenen Freizeit, 
denn ein kommentierter Objekt- 
code ist genauso rechtens wie ein 
kommentiertes Gedicht, und in 
beiden Fällen darf übrigens das 
Original als Großzitat mitgeliefert 
werden, wie bereits jedem Schul- 
buben aus seinen Deutschbüchern 
bekannt ist. Soeben erschien im 
Franzis-Verlag ein DOS-Buch 
(Ruhland, „DOS 3,3"), das den 
gesamten Objekticode („Großzi- 
tat“) enthält; eine Abmahnung ist 
damit praktisch vorprogrammiert. 
Vergleicht man Wozniaks obigen 
Wunsch mit der heutigen Einstel- 
lung der Firma Apple, dann sieht 
man deutlich, daß inzwischen ganz 
andere Strömungen dominieren. 
Wozniak ist längst ausgebootet: 
„Woz is out. Poor Woz. That’s the 
way the cookie crumbies,“ 

Ulrich Stiehl 





AUGE und Apple-München 


Die Apple User Group Europe e.V. 
(AUGE) befindet sich seit gerau- 
mer Zeit in einer Krise, wobei die 
Fluktuation im Vereinsvorstand iro- 
nischerweise eher Wirkung denn 
Ursache der Misere ist, die wohl 
letztlich durch eine im Hintergrund 
agierende „zweite Führungsgar- 
de“ („Background-Mafia“) bedingt 
ist. 

Die auf die Gründungsphase unter 
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Regie von Wolfgang Dederichs fol- 
gende Expansionsära bis 1973 un- 
ter dem Vorsitzenden Klaus Giese 
stellt meines Erachtens die frucht- 
barste Periode der AUGE dar. In- 
folge permanenter, vereinsinterner 
Querelen ging es danach rapide 
bergab. Zunächst wurde im März 
1983 Klaus-Peter Lucius zum Vor- 
sitzenden gewählt, der jedoch be- 
reits nach 5 Monaten seinen „Hut 


nahm“. Auf der nächsten Haupt- 
versammlung wurde Peter Derks 
im März 1984 zum Vorsitzenden 
erkoren, der ebenfalls nach kurzer 
Zeit im Juli 1984 „abdankte”., Die 
„Interregnen" waren durch ver- 
waiste „Hutständer“ auf der einen 
und Vereinsnörgeleien auf der an- 
deren Seite gekennzeichnet. Als 
dann unser „Peeker" und kurz da- 
nach „Apple’s unabhängiges Ma- 
gazin“ erschienen, machte sich 
nervöse Hektik breit. Um eine Ab- 
trift der Mitarbeiter des User-Ma- 
gazins zu verhindern, wurde eine 
großzügige Entlohnung vom 
„kopflosen“ Vorstand bewilligt, 
obgleich noch vor kurzem (Heft 3/ 
1984, S. 9) sowie in früheren User- 
Magazinen (z.B. Heft 2/1982, S. 2) 
Bezahlungen aus idealistischen 
Gründen kategorisch abgelehnt 
wurden. Den ab 1985 auf DM 
100,- erhöhten Jahresbeitrag wird 
man denn auch bitter nötig haben, 
da der halbe Vereinsetat jetzt 
durch Zahlungen an „ehrenamtli- 
che“ Mitarbeiter verschlungen 
werden dürfte, so daß eine weitere 
Jahresbeitragserhöhung praktisch 
vorprogrammiert ist. Um dem be- 
reits einsetzenden Strom der Aus- 
treienden zu begegnen, wurde im 
Dezember (Heft 8/1984, S. 7) ver- 
kündet: „Wer bis zum 31.12.84 
seinen Austritt rückgängig macht, 
braucht keine neue Aufnahmege- 
bühr zu zahlen.” 

Da die Firma Apple die Existenz 
der AUGE („Kopierverein“) völlig 
ignoriert und nunmehr sogar einen 
eigenen Apple-Club („Schweige- 
verein“) plant, geht die AUGE jetzt 
im User-Magazin aufs Ganze: 
Manfred Schürmann alias Key B. 
Hacker alias Macintosh-Frustrierter 
löste Wolfgang Gohe als farblosen 
Leiter der Macintosh-Arbeitsge- 
meinschaft ab und avancierte zum 
Protagonisten eines knallharten 
Kurses (s, User-Magazin, Heft 2/ 
1985, S. 5ff,). Während „Apple’s 
unabhängiges Magazin” als „Po- 
tenzierung von Seichtheiten der 
Vorbeterindustrie” abgestempelt 
wird, bleibt unser „Peeker" einst- 
weilen ungeschoren, obwohl oder 
gerade weil Schürmann in allen 
denkbaren Kombinationen 
„peekt" („anpeeken”, „erpee- 
ken“ usw.). In seinem furiosen 
Aufsatz „Lieber der Fall als der 
Kniefall“ versteigt er sich in For- 
mulierungen, wie man sie bei Ap- 
ple in München bislang noch nicht 
vernommen haben dürfte: „Profit, 
Profit und nochmals Profit. Und 
den macht Apple reichlich, um sich 
den Schaum zu leisten, mit dem 


immer wieder neue Kunden einge- 
seift werden ... Außer den stolzen 
Gewinnen verbirgt Apple so gut 
wie alles, was jede ordentliche Fir- 
ma sonst an Informationen auf den 
Tisch legt ... Wer den Mund so voll 
nimmt, muß auch was drin haben 
außer warmer Luft“. In seinem 
Diskurs hebt Schürmann immer 
wieder darauf ab, daß sich die Ap- 
ple-Niederlasssung in München 
völlig eingeigelt hat und jeden 
Kontakt mit der Außenwelt panisch 
meidet. Wird sich Apple-München 
durch solche Kritik ändern lassen? 
Wohl kaum, denn Apple-München 
ist lediglich der verlängerte Arm 
von Apple-Cupertino, und wenn 
Cupertino in Verkennung des spe- 
zifischen, bundesdeutschen Mi- 
krocomputermarktes „No, no’ 
sagt, dann kann München nicht 
„Doch, doch" sagen. Wie bei der 
AUGE ist auch bei Apple-München 
das Phänomen der Personalfluk- 
tuation (seit Anbeginn des 
„Peeker“ haben sich drei Presse- 
sprecherinnen die Klinke in die 
Hand gedrückt) nur Wirkung und 
nicht Ursache eines viel tiefer lie- 
genden Management-Konflikts, 
der sich aus amerikanischer Sicht 
etwa wie folgt darstellt: 

- In der Anfangszeit der amerikani- 
schen Apple-Firma („Wozniak- 
Jobs-Ära") war man auf Apple- 
Clubs, Freaks und peeker-ähnliche 
Zeitschriften („Call Apple”, „Nib- 
ble" usw.) angewiesen, da das 
eigene technische Knowhow aus 
personellen Gründen begrenzt 
war. Der kometenhafte Apple-Auf- 
stieg ist letztlich durch peekende 
Clubs und Freaks bedingt worden. 
- Dann kam eine Übergangsphase 
(„Jobs-Wozniak-Ära“), in der die 
Clubs und Freaks gerade noch ge- 
duldet wurden. 

— Schließlich trat man in die heuti- 
ge amerikanische Phase („Scul- 
ley-Jobs-Ära"), die durch die Pa- 
role „Keine Infos an Clubs, Freaks 
und kritische Zeitschriften“ ge- 
kennzeichnet ist. 

Diese Entwicklung hat aus der 
Sicht der amerikanischen Marke- 
ting-Strategie ihre Berechtigung, 
weil die amerikanische Mutterfirma 
über das technische Knowhow 
verfügt. Aus deutscher Sicht sieht 
die Lage jedoch ganz anders aus: 
— Erstens hinkt die deutsche Ent- 
wicklung der amerikanischen um 
mindestens zwei Jahre hinterher, 
und zwar hinsichtlich des Mikro- 
computermarktes im allgemeinen 
sowie hinsichtlich der Adaptation 
amerikanischer Produkte im be- 
sonderen. Ferner hinkt auch die 
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deutsche Computermentalität der 
amerikanischen hinterher. Diese 
Mentalitätsunterschiede erklären 
auch, warum beispielsweise der 
Mecki in den USA sehr gut und in 
Deutschland sehr schlecht ver- 
kauft wird. Deutsche assoziieren 
EDV immer noch mit Effizienz und 
Schnelligkeit, während Amerikaner 
inzwischen zusätzlich das Spieleri- 
sche und Ästhetische in den Vor- 
dergrund rücken. Angesichts einer 
Arbeitslosigkeit von über 10% 
wird es zur Zeit nur wenigen Un- 
ternehmern in den Sinn kommen, 
den eigenen Mitarbeitern ein 
Schnickschnack-Gerät in der Art 
des Mecki zur Verfügung zu stel- 
len, denn die Maus, die Grafiken 
und die diversen Schriftsorten 
würden zu Spielereien verlocken, 
für die die Arbeitsmentalität in 
deutschen Landen kaum Raum 
läßt. 

— Zweitens verfügt Apple-Mün- 
chen als reine Marketing-Firma 
über kein Knowhow, wie man es 
bei der amerikanischen Mutterge- 
sellschaft gewohnt ist. Oder ken- 
nen Sie eine Hardware oder Soft- 
ware, die in München entwickelt 
worden ist? Wenn man wie in den 
USA jetzt auch in Deutschland die 





Clubs und Freaks wie eine ausge- 
quetschte Zitrone wegwirft, so ent- 
steht ein technisches Informa- 
tionsvakuum, das die Hilfesuchen- 
den im Regen stehen läßt. So ge- 
sehen kann der Apple-Besitzer 
zwar auf Apple-München, nicht je- 
doch auf peeker-ähnliche Informa- 
tionsquellen verzichten. Dies hat 
man sicherlich in München er- 
kannt. Da jedoch die Direktiven 
aus Cupertino anders lauten, igelt 
man sich ein, damit man ja nichts 
Falsches sagt gemäß der Maxime 
„Sl tacuisses philosophus man- 
sisses", 


Angesichts der Kursänderung der 
AUGE wird man mit Spannung die- 
weitere Entwicklung nach der Wahl 
des neuen Vorsitzenden auf der 
bevorstehenden Jahreshauptver- 
sammlung im März verfolgen dür- 
fen. Bleibt nur zu hoffen, daß man 
die exzessive Vereinsmeierei auf- 
gibt und zu den ursprünglich ge- 
steckten Zielen wieder zurück- 
kehrt, denn Apple-München wird 
den Verein erst dann ernst neh- 
men, wenn man geschlossen und 
notfalls auch hart im Sinne des 
Schürmann-Kursus auftritt. 

Ulrich Stiehl 





Ergänzungen zu 


„ProDOS für Aufsteiger“, Bd. 1 


von Arne Schäpers 


(Herr Schäpers, ein exzellenter 
ProDOS-Kenner, hat mein Pro- 
DOS-Buch kritisch unter die Lupe 
genommen und dabei einiges rich- 
tiggestellt, das mir durch die „Lap- 
pen” gegangen ist. us) 


Seite 19 — Warum ist BLOAD 
(READ) erheblich schneller als 
BSAVE (WRITE)? 

WRITE arbeitet Byte per Byte (Puf- 
fer kopieren), READ dagegen in 
drei Stufen: 

Stufe 1: Byte per Byte (Pufferko- 
pie), bei gesetztem NEWLINE 
bleibt es auch dabei. Stufe 2: Block 
Read: Der Datenteil des File-Puf- 
fers wird auf die Zieladresse ge- 
setzt, und SET MARK liest unter 
Umgehung des File-Puffers direkt 
in den Zielbereich. Stufe 3: Wenn 
nach Stufe 1 und 2 immer noch 
ganze Blocks übrig sind, wird der 
Indexblock direkt ausgewertet und 
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von READ aus der Disk-Driver mit 
entsprechender Zieladresse auf- 
gerufen. Endet der READ nicht auf 
einer Blockgrenze, werden die 
letzten Bytes wieder Byte per Byte 
aus dem File-Puffer kopiert. Eine 
sehr durchdachte Routine. 


Seite 27 — Liest Bootprogramm 
auch Sektor 1? 

Das Boot-Programm liest Track 0, 
Sektor O, danach Sektor 2 (physi- 
kalische Sektornummer). Der 
Block 1 wird nur für SOS gelesen. 


Seite 32 — Was bedeuten Seek 
und Format beim Disk-Driver? 
SEEK ist für CMD = 00 nicht im- 
plementiert, Arm-Bewegungen fin- 
den keine statt. Im MLI wird vorher 
noch Block 00 00 gesetzt, um ein 
eventuelles Aussteigen über Feh- 
ler-Nr. 27 (hier: illegale Blocknum- 
mer) zu vermeiden. 


CMD = 03: FORMAT ist nur für die 
RAM-Disk implementiert. (Neue 
Erkenntnis: Wenn das sog. Init- 
Flag auf O gesetzt ist -— nach dem 
Booten automatisch der Fall—, wird 
vor dem ersten RAM-Disk-Zugriff 
der Directory- und Volume-Bit- 
Map-Block „initialisiert". Setzt 
man durch eine kleine Poke-Routi- 
ne das Init-Flag auf 255, so bleibt 
nach dem Neubooten der RAM- 
Disk-Inhalt unversehrt. Ein ent- 
sprechender Patch, der allerdings 
versionsabhängig ist, wird im 
nächsten „Peeker“ veröffentlicht. 
us) 

Seite 57 — Was bedeutet Label 
Präfix ($BF9YA) ungleich 0? 

Dies ist der Startindex des mo- 
mentan gesetzten Präfixes in der 
Seite $F100. Bereich $C0-$FE. 


Seite 63 — Korrekturen zu den in- 
ternen Puffern (gilt nur für 1.0.1): 
$EF25-$EFFF: Tabellen 
$F000-$FOFF: Variablen 
$F100-$F1EF: Neuer Pathname 
$F1C0-$FIFF: Präfix 

$F200: Volume Control Block 
$F300: File Control Block 
$F400-F5FF: Volume Bit Map 
$F600-$F7FF: Druckfehler: Hier 
steht zum zweiten Mal 
$F4000-$F5FF. Außerdem ist der 
Begriff Catalog-Block mißver- 
ständlich, da das BASIC.SYSTEM 
ein OPEN des Directory mit eige- 
nem File-Puffer und anschließen- 
dem READ durchführt. Folge: In 
$F600-$F7FF befindet sich zu- 
nächst der Hauptzeiger des Direc- 
tory. 


Selle 65 - 
fast"? 

Die Fehlermeldung kommt daher, 
daß der Formatter anstelle von 
$DE $AA $EB die Bytes $DE $AA 
$DE $EB als Address Field Trailer 
schreibt. Das zweite $DE wird nir- 
gendwo überprüft, nimmt aber pro 
Track 16 Bytes mehr Platz weg. 
Für künftige Zwecke reserviert? 


Warum „Drive too 


Seite 105 - Warum nur S2M-Volu- 
mes und 16M-Files? 
Max. Volume-Größe gesetzt durch 
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16-Bit-Blocknummer: 256 - 256 : 
512 Bytes. Max. File-Größe ge- 
setzt durch 24-Bit-Position im File: 
256 : 256 : 256 Bytes. (Daß ich dies 
nicht begründete, war ein „totaler 
Blackout“. us) 


Seite 107 — Präfix mit Schrägstrich 
am Ende? 

Dieser muß nicht definiert werden 
und wird auch nicht gespeichert. 
GET PREFIX hängt diesen Schräg- 
strich explizit an den ausgegebe- 
nen String an. 


Seite 120 - Was macht DELETE im 
einzelnen? 

DELETE (DESTROY) benutzt SET 
EOF, woraus sich die Begründung 
für das Löschen der Indexe ergibt. 
Allerdings wird immer nur der erste 
Block (Typ 3: Masterblock und er- 
ster Indexblock, Typ 2: Indexblock) 
auf der Diskette überschrieben. 
Folge: Von einer Datei des Typs 3 
bleibt der zweite Indexblock auf 
der Diskette voll erhalten. Ob das 
etwas für einen UNDELETE-Befehl 
nützt, ist eine andere Frage. 


Seite 132 - 
SECOND? 
Byte $14 enthält als Standard die 
Zahl $75, „HUSTON" steht auf 
den relativen Bytes $15-$1B, nicht 
auf $14-$1B. Beim Lesen eines 
Subdirectory-Key-Blocks wird die- 
ses Byte ($14) getestet. Die Zahl 
selber ist dabei unwichtig, es müs- 
sen 5 Bits gesetzt sein, ansonsten 
INCOMPATIBLE FILE FORMAT 
($D885). 


Was prüft „HU- 


Seite 150 — Spezielle System-Bit- 
Map-Konflikte 

Wenn ProDOS Daten in den Para- 
meterblock zurückliefert und der 
Parameterblock dabei auf einen 
Puffer zeigt (GET PREFIX/ONLINE 
etc.), wird der Puffer mit der Sy- 
stem-Bit-Map verglichen. Routinen 
mit einem Puffer in der Seite 3 
funktionieren deshalb nicht. Wenn 
der Puffer nicht auf einer Seiten- 
grenze anfängt, überprüft die 
Checkroutine nicht $200, sondern 
$300 Bytes. 





ProDOS-Bücher und -Aufsätze 


Wenn Sie sich gewundert haben, 
daß von der Serie „ProDOS für 
Anfänger“ bislang nur der 1. Teil 
(im Peeker, 2/1984) erschienen 
war, so hat dies einen besonderen 


Grund: Wir möchten Ihnen stets 
aktuelle und detaillierte Informatio- 
nen bieten. Dies ist uns jedoch bei 
ProDOS nur mit Mühe möglich, 
weil Apple allein im letzten Jahr 
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mindestens 3 Versionen — bekannt 
sind uns 1.0.1, 1.0.2, 1.1.1 - her- 
ausgebracht hat, die nicht völlig 


funktionsgleich sind. Bei einer 
oberflächlichen ProDOS-Darstel- 
lung in „Mecki-Manier" — viele 


Bildchen und wenige Worte -— 
könnte man die Feinheiten ignorie- 
ren. Dies geht jedoch nicht an, 
wenn handfeste professionelle 
Hilfsprogramme veröffentlicht wer- 
den sollen. Einige Beispiele: Bei 
der Version 1.1.1 beginnt das Ma- 
chine Language Interface MLI bei 
$DEOO und der Disk-Driver bei 
$D000, während sich noch bei der 
Version 1.0.1 das MLI bei $DO00 
und der Disk-Driver bei $F800 be- 
fand. Version 1.1.1 hat den neuen 
Befehl „BYE“ (Reboot-Routine), 
der bei 1.0.1 und 1.0.2 fehli. Der 
Uhr-Driver ist jetzt wieder verlegt 
worden usw. Der Grundsatz 
„Think first, program later“ wird 
augenscheinlich ignoriert. Dies 
verrät — gelinde ausgedrückt — 
Konzeptionslosigkeit, es sei denn, 
daß die Irritation intendiert ist, um 
den Fremdfirmen (Beispiel: Erphi- 
Controller mit ProDOS-Driver-Pat- 
ches) das Leben schwer zu ma- 
chen. 

Alle bisherigen „Peeker"-Pro- 
DOS-Utilities (QUICKCOPY, PRO- 
DOS.PATCH) beziehen sich auf 
die Version 1.0.1 und laufen nicht 
auf den späteren Versionen. Wir 
werden zukünftig die jeweils gülti- 
ge ProDOS-Version deutlich ver- 
merken und im übrigen unsere Uti- 
lities an neuere Versionen anpas- 
sen, wobei wir allerdings einige 
Zwischenversionen überspringen 
werden, da diese offenbar mehr 
„Übungscharakter“ haben. 


Zu ProDOS gibt es folgende Bü- 
cher: 


a) „ProDOS Technical Reference 
Manual“ (Apple): Sehr gründliche, 
aber zugleich sehr theoretische 
Beschreibung der MLI-Befehle 
(mit nur einem einzigen Anwen- 
dungsbeispiel!). Der Disk-Driver 
und das BASIC.SYSTEM werden 
nicht behandelt. ProDOS-Interna 
fehlen. Zielgruppe: Systempro- 
grammierer. 

b) „Beneath Apple ProDOS" 
(Quality Software): Stark an (a) an- 
gelehnte Darstellung; zusätzlich 
eine Reihe von Änwendungsbei- 
spielen sowie Patches (inzwischen 
teils überholt). Zielgruppe: As- 
semblerprogrammierer. 

c) „ProDOS für Aufsteiger, Band 
7“ (Hüthig-Verlag): Wenig an (a) 
angelehnte Darstellung der inter- 
nen und externen Speicherorgani- 
sation mit zahlreichen Block- 
Dumps und MLI-Beispielen, die 
auch unter Version 1.1.1 laufen. 
Die ProDOS-Global-Page ist wie 
bei (a) und (b) teils überholt. Ziel- 
gruppe: Assemblerprogrammierer. 
d) „ProDOS für Aufsteiger, Band 
2“ (Hüthig-Verlag): In Vorberei- 
tung befindliche Darstellung der 
BASIC.SYSTEM-Befehle. Ziel- 
gruppe: Applesoft-Programmierer. 
Aus Zeitgründen werde ich zu- 
nächst die Serie „ProDOS für An- 
fänger” im Peeker veröffentlichen 
und dann eine aktualisierte Zusam- 
menfassung der Serie — bereichert 
um größere ProDOS-Utilities — als 
2. Band von „ProDOS für Aufstei- 
ger" herausbringen. 

e) „Die ProDOS-Analyse" (Hü- 
thig-Verlag): In Vorbereitung be- 
findliche Beschreibung der Pro- 
DOS-Interna in Form eines sehr 
ausführlichen Disassembler-Kom- 
mentars. Zielgruppe: Ässembler- 
Programmierer. 

Ulrich Stiehl 





INALL 
INPUT für DOS/ProDOS 


Die nachfolgende Utility simuliert den Input-Befehl (Eingabe von 
Tastatur/Diskette) und läßt alle Zeichen zu (Komma, Doppelpunkt 
usw.). Anstelle von „INPUT X$" verwendet man jetzt „CALL 768, 
X$". Der Variablename ist beliebig, doch muß es sich um eine 
Stringvariable handeln. Ein ausführlicher Kommentar folgt in 
einer der nächsten Peeker-Ausgaben. 


10 FOR X = 768 TO 793: READ Y: POKE X, Y: NEXT 
20 DATA 22,6,277,32,190,222,32,227,223,32,108,221,133,133, 
132,134,32,44,213,200,32,233,277,76,154,218: 


REM von H. Grumser/1985 


30 CALL 768, X$: REM Beispiel 
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Apple-Bücher im Preisvergleich 


Die Zahl der Bücher speziell über den Apple II wird immer 
größer. Neben einer Vielzahl amerikanischer Titel kann der Leser 
inzwischen auf eine große Auswahl deutscher Werke zurückgrei- 
fen. Mit der wachsenden Titelzahl wächst aber auch das Preis- 
bewußtsein der Käufer, Die nachfolgende Aufstellung umfaßt 
deshalb eine nach dem Quotienten Preis/Seitenzahl aufsteigend 
sortierte Titelliste, die zeigt, daß man zwischen DM 0,07 bis DM 
0,90 pro Seite bezahlen muß. Bei deutschen Verlagen unterliegen 
Bücher in der Regel der sog. „Preisbildung der zweiten Hand", 
d.h. die Endabnehmerpreise sind gebunden (nach GWB 8 16 
zulässig); „Feilschen“ wäre also zwecklos. Ausländische Titel 
können demgegenüber von Importeuren frei kalkuliert werden. 
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Leserbriefe 


Hardware-Beiträge 

Mit dieser Postkarte möchte ich Ih- 
nen positive Resonanz verschaf- 
fen: Die von Ihnen verfaßten Bü- 
cher Apple Assembler und Apple 
DOS sind eine Fundgrube wertvol- 
ler Informationen zu einem unge- 
wohnt moderaten Preis; gleiches 
Lob für die Zeitschrift Peeker, wo- 
bei einige „Hardware-Beiträge" 
(Interfacekarten und angewandtes 
Interfacing) sehr gut hineinpassen 
würden. Ansonsten: weiter so und 
vielen Dank! Jürgen Treumer, 
München 


If...Then...Else (Peeker 1/84) 

Die sehr effektive „Block-If"- 
Struktur, die z.B. Fortran 77 bietet, 
kann auch in Applesoft-Basic leicht 
implementiert werden. Dazu muß 
im wesentlichen nur der logische 
Vergleichsausdruck invertiert 
werden. 

Fortran 77: 

IFexp 1 THEN 


Else IF exp2 THEN 
ELSE 


END IF 
Basic: 
aaa IF NOT expi THEN GOTO bbb 


GOTO ddd 
bbb IFNOT exp2 THEN GOTO ccec 


GOTO dad 
ccc REM „entspricht ELSE“ 


ddd REM „Sammelpunkt“ 

Es dürfen beliebig viele „Else IF"- 
Blöcke (oder auch gar keine) auf- 
treten, Der „ELSE"-Block bildet, 
falls vorhanden, den Abschluß. 
Das „NOT" im Basic-Text kann in 
den meisten Fällen durch einen 
„umgedrehten“ Vergleichsopera- 
tor ersetzt werden (aber bitte <= 
statt > usw.). Eine Ausnahme bil- 
den komplizierte logische Aus- 
drücke, die durch Umschreiben 
noch unübersichtlicher würden 
(und deshalb sowieso vermieden 
werden sollten). 

Die Punkte entsprechen den Be- 
fehlen der einzelnen Verzweigun- 
gen. Auch hier dürfen natürlich 
wieder Abfragen auftreten (Ver- 
schachtelung). 

Fortran erlaubt zwar einen beliebi- 
gen ÄAussprung aus dem Block-If, 
einen Einsprung aber nur via „IF 
expi THEN“. Da in Basic die ge- 
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samte Struktur nur programmtech- 
nisch existiert, ist natürlich der Ein- 
sprung an beliebiger Stelle mög- 
lich. Wie sinnvoll dies jedoch ist, 
muß jeder selbst entscheiden. Es 
entsteht auf diese Weise sehr 
leicht ein undurchdringlicher Spa- 
ghetti-Code. 

Albert Markl, Ismaning 


RAM-Disk-Driver 

Zunächst möchte ich Ihnen zu der 
wirklich gelungenen Konzeption 
des „Peeker" gratulieren. Eine 
Zeitschrift, die sich an den Bedürf- 
nissen des fortgeschrittenen Ap- 
ple-Programmierers orientiert und 
nicht nur auf einigen Seiten „Tips 
& Tricks" bringt, fehlte meines 
Erachtens schon lange auf dem 
Zeitschriftenmarkt. Neben Ihrer 
Serie über „Double Lores“- und 
„Double Hires“-Grafiken war ich 
besonders über den RAM-Disk- 
Driver für die Language-Card (Heft 
1/2 '85) begeistert. Als Anregung 
möchte ich an dieser Stelle folgen- 
des nennen: Damit die in der 
RAM-Disk abgelegten Files schnell 
auf einer Floppy abgelegt werden 
können, wäre eine kurze, von BA- 
SIC aufrufbare Utility wünschens- 
wert, die den Inhalt der RAM-Disk 
auf Diskette kopiert. 

Alle, die wie ich einen Apple II Plus 
ohne Kleinschrift besitzen, haben 
sich sicherlich über die merkwürdi- 
gen Zeichen in der Frage „Ram- 
disk mit Init J/N ?" des Drivers 
gewundert. Kleinbuchstaben wer- 
den vom „Großschrift-Apple" be- 
kanntlich als Sonderzeichen inter- 
pretiert. Ein kleiner Patch sorgt 
nach Laden des Drivers für Abhil- 
fe: $6151:AQ CD C9 DA AQ C9 
CE C9 D4 AB BF. Die Meldung 
erscheint nun in Großbuchstaben. 
Georg Bang, Oldenburg 


AUGE 

Ich kann Ihnen für Ihren Peeker 
nur gratulieren. Das ist genau die 
Informationsquelle, die ernsthafte 
Apple-Hobbyprogrammierer ge- 
sucht haben, die man aber vergeb- 
lich in der Apple User Group sucht. 
Was ich besonders gut finde, ist 
die Tatsache, daß Ihre Programme 
auch funktionieren. Das liegt wohl 
daran, daß Sie, der Chefredakteur, 
den Apple in- und auswendig ken- 
nen, aus der Branche kommen, 
und die Sorgen und Nöte der 
Freaks aus eigener Erfahrung ken- 
nen. Bitte machen Sie nur weiter 
so. Rudolf Rötering, Soest 


Assembler-Grundlagen 

Als relativer Neuling im Program- 
mieren des Apple |le komme ich 
zwar mit dem Programmieren in 
Applesoft ganz gut zuwege; doch 
schaue ich in den „Peeker", so 
begegnen mir die Programmdar- 
stellungen überwiegend in hexa- 
dezimaler und Assembler- 
Schreibweise. Nun habe ich mir 
gestern den Ässembler-Kurs „mi- 
ster micro" gekauft, der speziell für 
den Apple Il/lle geschrieben wur- 
de (Sybex-Verlag) und dem eine 
Assembler-Diskette beigefügt ist; 
doch wenn ich glaubte, mit diesem 
Rüstzeug endlich den Zugang zu 
den inneren Geheimnissen in der 
Handhabung meiner Konfiguration 
gefunden zu haben, so sehe ich 
mich entäuscht. Vielleicht könnten 
Sie mir da einige Hinweise geben, 
wie ich mit Sicherheit zu dem er- 
sehnten Durchblick komme, damit 
ich den „Peeker" in Zukunft auch 
mit Gewinn verstehen und nutzen 
kann. Ernst Kaiser, Titisee-Neu- 
stadt 


Jubeltests 

Erstmal herzlichen Glückwunsch 
zu dieser Zeitschrift. Wie ich hoffe, 
bleibt sie so interessant und frei 
von „Jubeltests", ansonsten finde 
ich ihre jetzige Mischung aus Soft- 
ware- und Hardware-Infos sehr 
gelungen. Bitte weiter so. 

Ich besitze seit 1979 einen Apple II 
europlus und bin naturgemäß be- 
sonders an Beiträgen zu diesem 
Thema interessiert. Insbesondere 
gute Assemblerprogramme inter- 
essieren mich, oder wie wäre es 
mal mit einem Beitrag zu Star-Ge- 
mini 10%; dort wäre die Character- 
Download-Procedure sehr interes- 
sant. Auch Z80-Assembler wäre 
bestimmt ein ergiebiges Thema, 
somit gibt es bestimmt noch viel zu 
tun. Wilfried Röll, Walldorf 


Glücklicher Mac-Besitzer 

Als ich Ihr Editorial in Heft 2/84 
gelesen hatte, griff ich spontan zur 
Maus, drehte den Bildschirm auf 
und möchte Ihnen hiermit mittei- 
len, daß ich mit meinem neuen Bü- 
romitarbeiter Fat Mac 512K be- 
stens zufrieden bin. Er ist das be- 
ste für den Preis, was ich probiert 
habe. Ich bin auf jeden Fall mit 
meiner Wahl glücklich. Insbeson- 
dere ist für mich der Einsatz des 
Zeichenprogramms eine tolle Al- 
ternative zu den technischen 
Zeichnungen, die ich im Rahmen 


meiner Arbeit zu machen hatte und 
ich nunmehr mit MacPaint erledige 
(MacDraw habe ich noch nicht aus- 
probieren können). 

Ebenso sind meine Damen über 
MacWrite glücklich und ich, da ich 
nunmehr auch einmal einen Text 
selbst tippen und ausdrucken 
kann. Und mit am besten finde ich 
die Übereinstimmung des Bild- 
schirmbildes mit dem Schriftbild 
einer Briefseite. 

Der einzige mir von meinen Da- 
men genannte Nachteil der Tasta- 
tur: Sie spricht ein bißchen zu 
leicht an. Wenn jemand noch zwi- 
schendrein Schreibmaschine 
schreiben muß, so wird ein unter- 
schiedlicher Anschlag der ver- 
schiedenen Tastaturen immer zu 
einer höheren Fehlerquote führen. 
Ich werde Apple vorschlagen, den 
Anschlag der Tastatur veränderlich 
zu gestalten. Und: Nennen Sie mir 
einen formschöneren Computer, 
Rechtsanwalt Klaus Mierswa, 
Mannheim 


Schattenseiten 

Als Leser Ihrer Bücher DOS 3.3 
und ProDOS war ich, nachdem ich 
einen Apple-Fachmann als Chefre- 
dakteur einer Computerzeitschrift 
fand, neugierig geworden. Nach 
der Lektüre der Ausgabe 2/84 se- 
he ich mich „genötigt", eine weite- 
re Zeitschrift zu beziehen. Zu Ihrer 
Frage im Leitartikel 2/84, ob denn 
bei Testbeschreibungen auch über 
Schattenseiten der jeweiligen 
Testobjekte geschrieben werden 
sollte, meine ich, daß gerade die- 
ses eine unabhängige Zeitschrift 
(Redaktion) auszeichnet. Im übri- 
gen möchte ich Sie ermutigen, so 
weiterzumachen. Halten Sie Ver- 
bindung zu Ihren Lesern. Rolf 
Steinfelder, Hildesheim 
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Mailmerger und Appleworks 


getestet von Ulrich Stiehl 


Die Firma INTUS Lern-Systeme 
AG, 7890 Waldshut-Tiengen, Kai- 
serstraße 21, Tel. 07751/7920, ist 
eigentlich auf Schulsoftware spe- 


Appleworks 


Appleworks ist ein von Rupert 
Lissner (Autor von Quickfile) für 
die Firma Apple entwickeltes drei- 
telllges Programmpaket für den 
privaten und geschäftlichen Be- 
reich (vorwiegend Kleingewerbe- 
treibende), das unter dem Pro- 
DOS-Betriebssystem läuft. Um es 
gleich vorweg zu sagen: Dieses 
Paket ist unter Berücksichtigung 
der charakterisierten Zielgruppe In 
jedem Fall sein Geld wert! Es setzt 
einen Apple Ilc oder einen Apple 
Ile mit 64K-Karte voraus, läuft also 
nicht auf dem Il Plus. Eine einfache 
80-Zeichenkarte ohne 64K-Zu- 
satzspeicher wäre ebenfalls mög- 
lich, doch wäre dann der zur Verfü- 
gung stehende Arbeitsspeicher 
viel zu gering. Appleworks wird mit 
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zialisiert, doch hat sie auch einige 
allgemeine Anwenderprogramme 
veröffentlicht, z.B. den Mailmerger 
als Hilfsprogramm zu Appleworks. 





einem knapp 350seitigen, zweifar- 
big gedruckten Handbuch in Spi- 
ralbindung sowie mit 2 Systemdis- 
ketten geliefert. Die sogenannte 
Start-Diskette dient zum Booten 
des ProDOS-Betriebssystems, 
wobei auch ein „Warmstart" mit 
„-PRODOS“ o.ä. möglich ist. 
Denn man hat Appleworks nicht 
kopiergeschützt, damit es unein- 
geschränkt mit Festplatten (Profile 
usw.) sowie ggf. auch mit RAM- 
Disks benutzt werden kann. Die 
64K-Karte selbst wird allerdings 
als Datenspeicher und nicht als 
RAM-Disk eingesetzt. Wenn man 
weder die Profile noch größere 
RAM-Karten besitzt, so empfehlen 
sich unbedingt 2 Laufwerke, da 
sonst Programm- und Datendis- 


kette permanent gewechselt wer- 
den müßten. Nach dem „Hochfah- 
ren“ des Betriebssystems (Pro- 
DOS Version 1.1.1) von der Start- 
Diskette muß man die sog. Pro- 
gramm-Diskette einlegen, die 
praktisch voll ist, weil das modular 
aufgebaute, eigentiiche  Ap- 
pleworks-Programm über 200 
Blocks einnimmt, die zu einem ein- 
zigen „Monster"-File zusammen- 
gefaßt wurden. Die diversen Mo- 
dule enthalten nicht nur die As- 
semblerteilprogramme, sondern 
auch die jeweils benötigten Menü- 
Texte. 

Appleworks besticht durch den 
Benutzerkomfort und die Ge- 
schwindigkeit, mit der die einzel- 
nen Funktionen (Sortieren, Su- 
chen usw.) ausgeführt werden. 
Diese hohe Geschwindigkeit 
kommi jedoch nicht von ungefähr: 
Appleworks ist ein RAM-orientier- 
tes Programmpaket, d.h. alles fin- 
det im Arbeitsspeicher („auf dem 
Schreibtisch") statt. Eine einzelne 
Datei oder die Summe aller Datei- 
en darf im Falle einer 64K-Karte ca. 
55K nicht überschreiten. Ap- 
pleworks ist deshalb nur dann opti- 
mal, wenn entweder kleinere Da- 
tenmassen verwaltet oder größere 
Datenmassen sinnvoll aufgeteilt 
werden können, 

Erwähnenswert ist die Flexibilität, 
mit der Fremddaten (ASCII-Files) 
in Appleworks überführt werden 
können. Nur so war es mir übri- 
gens möglich, mit „schnell ge- 
strickten“ Programmen große Da- 
teien zum Austesten von Ap- 
pleworks zu erzeugen. 


Modul 1: Dateiverwaltung: Die- 
ses Modul, das eine Quickfile-Mo- 
difikation darstellt, dient zum Anle- 
gen, Sortieren und Ausdrucken 
von Dateien aller Art, wobei auch 
„rechnende Felder“ zulässig sind. 
Eine Datei könnte theoretisch 1350 
Datensätze enthalten. Ein Daten- 
satz ist die Summe der Felder (bei 
Adreßverwaltung: Vorname, Zuna- 
me, Straße usw.). Ein Datensatz 
könnte theoretisch 1024 Zeichen 
oder bis zu 30 Felder mit jeweils 
bis zu 76 Zeichen umfassen. We- 
gen der 55K-Kapazität können je- 
doch bei einer Adreßverwaltungs- 
datei, deren Datensätze (mit Brief- 
anrede usw.) erfahrungsgemäß ca. 
180 Zeichen groß sein müssen, 
nur ca. 300 Adressen verwaltet 
werden. (Zum Vergleich kann bei 
meinem „DB-Meister“ auf 650 
180-Zeichen-Datensätze zugegrif- 
fen werden.) Die Appleworks- „Da- 
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tenbank” ist damit mehr im Privat- 
und weniger im Geschäftsbereich 
einsetzbar. 


Modul 2: Textverarbeitung: Die- 
ses Modul hat mir am besten gefal- 
len. Mit einem 55K-Arbeitsspei- 
cher — dies wären ca. 11 Peeker- 
Druckseiten oder ca. 25 Schreib- 
maschinenseiten — kann man sehr 
große Textmassen bearbeiten. 
Überraschenderweise ist die Spei- 
cherverwaltung besser als beim 
A/’K-Äpplewriter gelöst, so daß 
man selbst bei vollem Speicher 
noch relativ schnell schreiben 
kann, was beim Applewriter Ile 
nicht mehr möglich ist. Funktionen 
wie Suchen und Ersetzen ähneln 
dem Applewriter. Analog zum 
Wordstar kann man einen rechten 
Rand einstellen, doch werden Sil- 
bentrennungen nicht angeboten. 
Wenn man darauf keinen Wert legt, 
kann man jetzt -— im Gegensatz 
zum Äpplewriter — ein Dokument 
immer so sehen, wie es später ge- 
druckt wird. (Der neue und in 
Deutschland noch nicht erhältliche 
ProDOS-Applewriter wird ähnliche 
Features aufweisen.) 


Modul 3: Tabellenkalulation: 
Dieses Modul entspricht funktio- 
nell dem altbewährten Visicalc. 
Rein theoretisch könnten über 
100.000 Zahlen- bzw. Rechenrfel- 
der, unterteilt in bis zu 127 Spalten 
und bis zu 999 Zeilen, eingerichtet 
werden. Wegen der 55K-Spei- 
cherbegrenzung liegt jedoch die 
praktische Obergrenze bei 5000- 
6000 Feldern. Visicalc-DIF-Datei- 
en können von Appleworks über- 
nommen werden. 


Mailmerger 


HFAILWERGER 
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Obgleich Appleworks als integrier- 
tes Softwarepaket angepriesen 
wird, hapert es in praxi etwas mit 
der Integration. Beispielsweise 
können Adressen (aus Modul 1) 
nicht mit einem Schemabrief (aus 
Modul 2) verknüpft werden. Hier 
hilft der Mailmerger, der ursprüng- 
lich von der englischen Firma Am- 
ber Software entwickelt und von 
Peter Meyer aus dem Hause IN- 
TUS für deutsche Verhältnisse 
überarbeitet wurde. Der Mailmer- 
ger wird mit einer knapp 40seiti- 
gen, im Kleinoffset hergestellten 
Anleitung und 2 Programmdisket- 
ten geliefert. Um zu veranschauli- 
chen, wie Mailmerger funktioniert, 
ein vereinfachtes Beispiel: 


a) Mit dem Modul 1 von Ap- 
pleworks (Dateiverwaltung) erstellt 
man wie bisher die Adreßdatei. 
Diese Datei muß jedoch für den 
Mailmerger in eine ASCII-Datei 
umgewandelt und auf einer Daten- 
diskette gespeichert werden. Bei 
vollen Appleworks-Adreßdateien 
(55K) muß man praktisch immer 
eine zusätzliche ProDOS-Daten- 
diskette bereithalten. 

b) Mit dem Modul 2 von Ap- 
pleworks (Textverarbeitung) er- 
stellt man den Schemabrief, der 
auch „rechnende Felder“ enthal- 
ten darf, In einer vorgeschriebenen 
FOoLmRz2BD: 


} VORNAME 
} ZUNAME 
t STRASSE 
MPLZ 
FORT 

+ ANREDE 


ea el 


? VORNAME + ZUNAME 
} STRASSE 
F PLZ FORT 


? ANREDE, 


(ab hier Briefkörper) 


Zunächst müssen also die zu ver- 
wendenden Felder mit dem „?"- 
Zeichen definiert werden (Defini- 
tionskopf, der später selbst nicht 
ausgedruckt wird). Danach folgt 
der eigentliche Schemabrief mit 
den Felder-Platzhaltern. Der ganze 
Text muß auch hier aus Ap- 
pleworks heraus in eine ASCII-Da- 
teil umgewandelt und auf einer Da- 
tendiskette gespeichert werden. 

Nach dem Booten der Mailmerger- 
Diskette von Drive 1 — die ASCII- 
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Datendiskette legt man zweckmä- 
Bigerweise in Drive 2 — braucht 
man dann nur noch Adreß- und 
Briefdateiname einzugeben, und 
schon kann der automatische Aus- 
druck beginnen. Die Bildschirm- 
Menüs erklären sich von selbst, so 
daß nach kurzer Benutzung die 
Anleitung nicht mehr benötigt wird. 
Der Mailmerger ist damit eine nütz- 
liche Ergänzung zu Appleworks für 
den Fall, daß Schemabriefe (Wer- 
bebriefe, Rechnungen, Mahnun- 
gen usw.) mit Adressen gemischt 
(„gemergt“) werden sollen. 


Einige Dinge gefallen mir jedoch 
nicht: Der Mailmerger ist partiell 
kopiergeschützt, wobei sich die 
geschützten Dateien 
+ MINI -SGLTEIN EXT Uswe 156° 
steht für Version 1.5 German) bis- 
weilen selbst nicht lesen können, 
worauf das Hauptprogramm-Modul 
erneut geladen wird. Außerdem ist 
im Gegensatz zu den ProDOS- 
Richtlinien slotabhängig program- 
miert worden (Slot 6, Drive 1), wo- 
mit der Einsatz einer Profile oder 
RAM-Disk entfällt. Ob die Profile 
als Datendisk verwendet werden 
kann, konnte ich mangels Hard- 
ware nicht feststellen. Die Verwen- 
dung der 64K-RAM-Disk (/RAM, 
S3, D2) in dem Mailmerger-Modul 
„MM.A", Programmzeilen 20130 
und 20240 ff. ist jedoch auf alle 
Fälle nicht möglich, da mit der dort 
enthaltenen fehlerhaften Directory- 
Read-Methode ein (verkürztes) 
RAM-Disk-Directory nicht ohne 
End-of-Data-Fehlermeldung gele- 
sen werden kann. 


Weiterhin finde ich es schwach, 
daß der Mailmerger ein Applesoft- 
Programm ist, Zwar sind einige 
Ampersand-Routinen an das Ba- 
sic-Programm angehängt worden, 
doch ist der Mailmerger insgesamt 
zu langsam. Mit Hilfe der Balfer- 
Interface-Karte, die an anderer 
Stelle in diesem Peeker beschrie- 
ben ist, habe ich einen Druckerslot 
vorgetäuscht und konnte damit er- 
mitteln, daß die interne Aufberei- 
tung selbst bei nicht-rechnenden 
Briefen ca. 10s pro Brief dauert. 


Damit können insbesondere schnel- 
le Matrixdrucker vom Mailmerger 
nicht optimal bedient werden; dies 
gilt namentlich für kürzere Schema- 
briefe. 


Schließlich mißfällt mir, daß der 
Mailmerger, obgleich er speziell für 
Appleworks gedacht ist, nicht di- 
rekt auf die ureigenen Appleworks- 
Dateien zugreifen kann. Durch die 
vorherige Umwandlung in ASCII- 


beiten wollen. Der RAM-Disk-Bug 
soll It. Rücksprache in Kürze be- 
seitigt werden. 


Dateien wird der Mailmerge-Vor- 
gang unnötig umständlich und zeit- 
raubend. 

Zur Zeit ist der Mailmerger die ein- 
zige Alternative für Appleworks- 
Besitzer, die Schemabriefe verar- 


Ulrich Stiehl 





Nutzen Sie Ihren Apple-Computer 
auch zum Lernen 


INTUS-Lernprogramme sind attraktiv und motivierend für vergnügliches 
und leichtes Lernen mit hohem Lernerfolg. 
Alle Programme in deutscher Sprache für Apple Ile und Ilc. 












@ Maschinenschreiben wie der Blitz. Didaktisch 








ausgezeichnet. Garantiert erfolgreich in 20 Lektionen. DM 188,-- 
@ Basic-Lernprogramm. Bestes Lernprogramm 1982 

in USA. DM 295,—— 
® Computer-Simulator. Mit Lehrgang in 5 Lektionen. DM 146,-— 
@ Lesen wie der Blitz. Sehr wirkungsvolles Lesetrainiing.. DM 98,-—— 






® Zeichensetzung. Aus der Serie „Deutsche Grammatik 
mit Spaß“. Für Sekretärinnen, Schüler und Jedermann“. DM 165,—- 











@ \Wortschatztrainer, Franz./Deutsch, 800 Wörter DM 140,—— | 
Englisch/Deutsch, 800 Wörter DM 140,-- 
Business English, 1200 Wörter DM 163,—— 
® Rechentrainer, Grundstufe (bis 100/2. Schuljahr) DM 98,-- 
Mittelstufe (einschl. Bruchrechnen) DM 98,-- 

@ \Wissenstrainer. Lernstoff selber eingeben, speichern und 

abfragen. Für Vokabeln, Formeln, Fahrschule usw. DM 69,— 
® Demo-Diskette mit Teilen aus diesen Programmen. DM 10,-——- 






@ Schulprogramme wie Rechnen/Mathem., Sprachen, Naturwiss., 
Informatik, Vorschule. Bestens für die Nachhilfe geeignet, 







| #%A%% Mit Ihrer ersten Bestellung erhalten Sie kostenlos eine Diskette 
mit sieben Denk- und Strategiespielen. 


UN 
INTUS LERN-SYSTEME AG 


Kaiserstraße 21 - 7890 Waldshut-Tiengen - Telefon 07751-7920 
Schweiz: CH-6981 Astano - Telefon 091-732551 und 042-2231 13 






















%& Bücher Softwore Hilfsınillel 


BE] | EEE Pandsbook FE mu? :e} 


Gratis! 


Eine detaillierte Bi 


Zeichensatz Größe Stil | 






















Apple Ii-Echallung 4 
Apple Il Mensa AppleQuick 
7 eieren, Interfanek| Das handliche Nachschlagewerk 
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h ieh „| und Befehle! 
ae 4] 64 Seiten über Applesoft, DOS, 


(Schaltpläne und 2#| Gleich anfordern! 
Theorie und praktische Tips. 
ISBN 3-59058-012-2 
215 Seiten, DIN A4, DM 64,-- |) 

In allen Buchhandlungen und Computershops oder | 
direkt von: Pandabooks , Bismarckstr. 67, are 
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Erphi-Controller 


Eine kompatible Erweiterung 
getestet von H. Grumser 


Die Firma erphi electronic GmbH 
vertreibt über den Fachhandel (al- 
so nicht direkt, weshalb man sich 
an Zwischenhändler wie Ueding 
usw. wenden muß) den Controller 
AFDC2, der den Anschluß von 
zwei Diskettenlaufwerken erlaubt, 
wobei außer zwei üblichen „Apple- 
Schnittstellen“ (20polig) auch eine 
Standard-Schnittstelle (Shugart- 
Schnittstelle, 34polig) vorliegt. So- 
mit können sowohl Apple-Laufwer- 
ke und Kompatible als auch Stan- 
dard-Laufwerke betrieben werden. 
Beim Auspacken des Controllers 
erlebt man die erste angenehme 
Überraschung. Die Karte zeichnet 
sich nicht, wie viele andere, durch 
kreuz und quer verteilte Bauteile 
mit nachträglich eingesetzten Kon- 
densatoren aus, sondern durch 
höchste Professionalität. Der mit- 
gelieferte Schaltplan zeigt die Ein- 
sicht, daß Qualität und Transpa- 
renz In engem Zusammenhang 
stehen. 

Die Hardwareanpassung an ver- 
schiedene Laufwerke erfogt durch 
zwei auf der Karte befindlichen 
Schaltergruppen, mit denen 
Schnittstellentyp und Aufzeich- 
nungsformat (Spurdichte, einsei- 
tig/doppelseitig, 35(70)/40(80) 
Spuren) vorgegeben werden. Da- 
durch ist es möglich, Floppy-Disk- 
Drives mit einer Kapazität bis zu 
5640K zu betreiben. 

Die volle Leistungsfähigkeit des 
Controllers kann nur ausgeschöpft 
werden, wenn die verfügbaren Be- 
triebssysteme entsprechend ge- 
patcht und um einige Teile erwei- 
tert werden, Dies geschieht durch 
einen sogenannten Autopatch, der 
beim Booten des Rechners das 
Betriebssystem an den erforderli- 
chen Stellen ändert. Der Vorteil 
dieses Verfahrens liegt darin, daß 
die Disketten weiterhin auf „nor- 
malen“ Systemen bootfähig blei- 
ben; das Image des Betriebssy- 
stems wird auf der Diskette nicht 
geändert. 

Das Patch-Programm selbst, der- 
zeit Version 5.0, ist Bestandteil der 
Controller-Firmware, die wegen ih- 
res Umfangs nur noch in Slot 6 
lauffähig ist. Dieses Programm ist 
in der Lage, DOS 3.3, Pascal 1.1 
sowie CP/M 2.2 (56K CP/M von 
Digital Research) zu erkennen und 
zu modifizieren. Zum Test lag be- 
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reits Version 6/3 bzw. 6/5 für Di- 
versi-DOS (2-C und 4-C), Pascal 
1.2 (64K und 128K), CP/M 2.20 
(B) (56K-Version von Microsoft) 
sowie ProDOS (1.0.1, 1.1 — ge- 
meint 1.0.2?- und 1.1.1) vor. Man 
beachte, daß der Patch nur beim 
Booten erfolgt. Würde man z.B. 
ProDOS erneut mit BRUN PRO- 
DOS, A$2000, TSYS einlesen, so 
käme die Controller-Firmware 
nicht zum Einsatz und ProDOS 
würde (mit einem 80-Spur-Lauf- 
werk) nicht mehr laufen. 

Die speziellen Besonderheiten der 
einzelnen Betriebssysteme, insbe- 
sonders bezüglich der Verwaltung 
größerer Datenmengen, sind in 
dem mitgelieferten Handbuch, das 
auf über 50 Seiten sehr detailliert 
alle Hard- und Softwareprobleme 
erläutert, ausführlich beschrieben. 
Da nicht alle Initialisierungs- und 
Kopierprogramme, die im allge- 
meinen beim Erwerb eines Be- 





triebssystems mitgeliefert werden, 
höhere Kapazitäten verwalten kön- 
nen, liefert die Firma erphi eine 
Multi-Disk, die entweder eigene 
Routinen enthält oder bereits vor- 
handene Systemroutinen entspre- 
chend modifiziert. 

Bei der Anpassung der Betriebssy- 
steme an neue Hardware-Gege- 
benheiten hat man sich bei erphi 
die Kompatibilität zum alten Sy- 
siem zur höchsten Maxime ge- 
wählt. So wurde z.B. beim DOS 
3.3 die größere Datenmenge nicht 
durch eine trickreiche Erweiterung 
der Catalogspur und der VTOC er- 
reicht, sondern durch die Einrich- 
tung eines zweiten Catalogs, der 
virtuell über Drive 3 und 4 ange- 
sprochen wird (DOS 3.3 kann ma- 
ximai 400K pro Volume verwalten). 
Soll der Apple ausschließlich mit 
Laufwerken höherer Kapazität be- 
trieben werden, so stellt sich das 
Problem, käuflich erworbene Soft- 
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ware, die fast immer auf 35-Spur- 
Disketten vertrieben wird, auf eine 
Diskette höherer Kapazität zu ko- 
pieren. Hierzu befindet sich auf der 
Multi-Disk eine Utility, die ein be- 
stimmtes Laufwerk des erweiterten 
Floppy-Disk-Systems per Soft- 
ware zu einem 35-Spur-Drive er- 
klärt. 

Beim Test wurde ein 640K-Dop- 
pellaufwerk der Firma erphi be- 
nutzt, wobei unter allen Betriebs- 
systemen die erhöhte Kapazität 
ohne Schwierigkeiten ansprechbar 
war. Der Vorteil zeigte sich beson- 
ders unter Pascal, da sich hier nun 
die Möglichkeit bietet, alle 4 Sy- 
stem-Disketten auf einer einzigen 
unterzubringen. 

Das Handbuch in Ringbuchform, 
das im übrigen auch einen Teil für 
Assemblerprogrammierer enthält, 
rundet den durchweg positiven 
Eindruck ab. Der Preis von ca. DM 
350,— steht gänzlich in Relation zur 
Qualität dieses Produkts. 


Ausgabe und 
Eingabe mi: 


TYPETERM® 


APPLE Ile 


Das bedeutet: Computer- 
Textverarbeitung von der 


Schreibmaschinentastatur! 


CE-50mit DM 1348,- 
[NZ incl. MWSt. 








€ 
QUALITAT AUS ERSTER HAND 


Ein starkes Interface für starke 
Maschinen! Alle Cursor- und CTL- 
Befehle. 2k ROM auf der Karte für 
DOS, ZDOS, CP/M, Pascal. Slot 
wählbar. Alle Features: Hoch-/Tief- 
stellen, autom. Unterstreichen, var. 
Zeichen- u. Zeilenabstände, autom. 
Papiereinzug, Auto CR/LF usw. usw. 
Ausführl. Handbuch. 


TYPETERM gibt’s für alle CE- u. 
EM-Maschinen ab CE-50! Bitte 
‚, Apple Il bzw. Ile angeben. 


Das gesamte Programm günstig! 
Versand NN + Porto + 6,— oder 
Vorkasse netto portofrei (Inland), 
Kto. 147 70-306 PGiroA Han. 
Handbuch TYPETERM vorab 10,- | 
(Anrechnung). TYPETERM® - ein 
Produkt von 


interkom Kack & Mreches GmtH 


sti,, 3004 Isernhagen 
electronic le 87393 





















75 


INTERTEXT 


Internationale Textautomation mit dem Apple Ile 


INTERTEXT ist ein von der Firma 
Sauer entwickeltes und auf dem 
Applewriter-TKS-System (TKS = 
Textkommandosprache; WPL = 
Word Processing Language) ba- 
sierendes Programm für automati- 
sierte Textverarbeitung mit dem 
Apple Ile. Das System wurde mir 
vor kurzem in der Peeker-Redak- 
tion vorgeführt. 

Je 4.000 Textbausteine in den 
Sprachen Deutsch, Englisch, Fran- 
zösisch und Spanisch umfassen 
den gesamten Bereich der Ge- 
schäftskorrespondenz und ermög- 
lichen die Rationalisierung und Au- 
tomatisierung des deutschen und 
internationalen Schriftverkehrs. 
Die Verarbeitung der Bausteine er- 


FTSE 


ELEIMTROTIM- 
A lm 


el aan 
ae Selln- 


eng 
GES 


Hiylagramma 
ALTE 
EHE 
ra 
Hatrwärke 

LAU TREUEN 
Aktien Filler 

Kal TERN 


Grafische Darstellung von Kurven: Hi- 
stogramme, kart. Koord., halb- u. 
doppeltlog. Darstellung, Polarkoor- 
dinaten, Zeilendrucker-Ausgabe 


Signalanalyse: Mittel- u. Effektivwert, 
Fourier-Reihen u. -Transformation 
Statistik- und Datenanalyse: Methode 
der kl. Quadrate, Punktstatistik 


Passive Netzwerke: Laplace-Trans- 
formation, Netzwerkanalyse, Wur- 
zeln eines Polynoms 


Aktive Filter: Tief-, Hoch-, Bandpaß, 
Bandsperre 


Halbleiterschaltungen: Trans.-Stufen 
Rechnen mit komplexen Zahlen 


192 S., 165 x 235 mm, 120 Abb. + 
Tab., über 50 Prog., 39,80 DM 


Ir ELeRN! 


Bahnhofstraße 30 - 3550 Marburg 
Tel.: 06421/63602 
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folgt am Bildschirm durch Eingabe 
entsprechender Satz-Nummen 
(Codes). Die Einarbeitungszeit ist 
relativ kurz. Da die Bausteine in 
allen vier Sprachen identisch co- 
diert sind, ist es möglich, Aus- 
landskorrespondenz ohne perfekte 
Fremdsprachenkenntnisse zu 
schreiben. An jeder Stelle der 
Briefe können Variablen oder eige- 
ne Sätze per Tastatur eingefügt 
werden. Eine Verknüpfung mit 
Adreßdateien ist möglich, falls die- 
se mit dem Appiewriter erstellt 
wurden. INTERTEXT kann jeder- 
zeit durch eigene Bausteine erwei- 
tert werden. Dies wird auch unum- 
gänglich sein, da die Textbausteine 
nicht branchen-, geschweige denn 


Apple 
DDR 


Ba le}:} 


Mehr Informationen 
und Händleranfragen bei: 


R. Alverdes 
Schwarzwaldstr. Ba 
7602 Oberkirch 
hei: riEri 
LA RPErE | 


Katalog geten DM 1.- 
in Briefmarken, 


Wir haben die neuste 
Software und Peri- 
pherie fürden Apple 
TEE EEE Etes 


War H! 


ee 


langsam? 
Die TempoHexe ("SpeeDemon”) macht den Apple 
I}, II+ und Ile so schnell wie die populären 16bit 
Rechner. Die TempoHexe beschleunigt alle Pro- 
gramme bis zu 31/2 mal - absolut ohne jede Soft- 
ware-Änderung! Einfach einstecken, einschalten 





firmenspezifisch sind. Hinzu 
kommt, daß zumindest das Eng- 
lisch, das mir in Form einiger Mu- 
stersätze vorlag, nicht immer idio- 
matisch korrekt ist, z.B. „Our cuSs- 
tomers place very much importan- 
ce on first-class quality only.” 


4.000 Textbausteine in 1 Sprache 
kosten DM 1.990,-, 2 Sprachen 
(z.B. Deutsch/Englisch}h DM 
3.600,-, und alle 4 Sprachen mit 
insgesamt ca. 16.000 Bausteinen 
DM 5.900,-. Zum Vergleich kostet 
ein zwei- oder mehrsprachiges 
Satzwörterbuch für Auslandskorre- 
spondenz mit 5.000 bis 10.000 
Mustersätzen DM 50,- bis DM 
100,-. So kostet etwa mein 560sei- 





‚8er MA 
—geh MA 


tiges „Satzwörterbuch des Buch- 
und Verlagswesens“ mit 10.000 
Beispielsätzen nur DM 88,-. Dies 
zeigt wieder einmal, daß eine 
„Buch-Datenbank“ erheblich 
preiswerter als eine „Computer- 
Datenbank“ ist. Das TKS-System 
allein kostet übrigens DM 790, -, ist 
also teurer als der Applewriter Ile 
selbst (ca. DM 500,-). Das Textver- 
arbeitungssystem setzt einen Ap- 
ple Ile mit 64K-Karte und 2 Drives 
voraus. Für Firmen mit viel scha- 
blonenmäßiger Korrespondenz ist 
INTERTEXT empfehlenswert, wo- 
bei man allerdings tief in die Ta- 
sche greifen muß. 

Ulrich Stiehl 


Sertlutdeid 


gib Äloiglp rloob sie nemme 


Zuverlässigen 
Epson 


(EN Ob3 6) Sıswtus S 
lsdsHAulnsenA + 
1slloltnosisque + 

geußrlandd + 

roudbrisH zsruetuslQ + 


tisısdedsintsd “A E 1sbo “a dA geiswinsw 
—.800S MO un 


—see MO 


lstesisp brıu 


ANSR 1stuqmod 


+ S0d9 + 08-5 + IN + olill 
uistesT .qsa 


(3X09F) svndQ olqgA 


HinflashsiuqmodD nnemttoH 
Telefon 0431/732222 oder 040/3937 13 








SCREEN80.SAVER 


Speichert den 88-Z/Z-Bildschirm von IIc/IIe 
Funktioniert 
unter DOS 3.3 und ProDOS,. Nach dem Poken 
der Maschinenroutine SAVER aufrufen, 
in Zeile 238 angegeben. Dateiname beliebig, 
Zum späteren Einlesen des Textfiles die 
INALL-Routine verwenden [s. S. 70). 


als Textfile auf Diskette. 


199 REM SCREEN8®.SAVER von U.Stiehl/85 
11® DATA 169,9,173,80,3,1698,9,149,81,3 
126 DATA 173 ,50,3 52, 193: 251,172,81,3, 141 


138 DATA 
148 DATA 
158 DATA 
168 DATA 
178 DATA 
188 DATA 
19% RESTORE : 


wie 


289 
21 
239 


85,192,32,58,3,172,81,3,.141,84 
192,32,58,3,172,81,3,299, 192,4 
208,221,169,141,32,68,3,238,89,3 
173,80,3,201,24,144,294,96, 177,40 
9,128,291,169,176,2,105,64,141,84 
192,32,75,3,96,41,255,108,54,®9,® 
FOR X = 768 TO 848: READ Y: 
POKE X,Y: NEXT 

REM Demo-Anwendung 

PRINT CHR$ (4) "PR#3": LIST 

PRINT CHR$ (4) "OPEN SCHIRM": 

PRINT CHR$ (4) "WRITE SCHIRM": 

CALL 768: PRINT CHR$ (4)"CLOSE" 
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Akustikkoppler AK 300 


Der AK 300 der Firma Software 
Express ist ein postalisch zugelas- 
sener Akustikkoppler (mit FTZ- 
Nummer), der mit einer normalen 
V24-Schnittstelle ausgestattet ist 
und sich deshalb an den Apple Ilc 
(V24 bereits eingebaut) oder den 
Apple lie mit der Super-Serial- 
Card anschließen läßt. Die Daten- 


übertragung erfolgt wie üblich mit 
300 Baud, also ca. 30 Zeichen/ 
Sekunde. Neben Netzanschluß 
besteht auch die Möglichkeit des 
Batteriebetriebs mit den normalen 
1,5-Volt-Batterien, so daß sich der 
AK 300 besonders für den IIc emp- 
fiehlt. Einige Apple-Händler haben 
den AK 300 im Lieferprogramm. 


Akustikkoppler dataphon s-21-d 


Die Kommunikation mit Datenban- 
ken, Mailboxen, Großrechnern und 
anderen Mikrocomputern über das 
Telefonnetz ermöglicht der seit 
kurzem auf dem Markt erhältliche 
Akustikkoppler dataphon s-21-d, 
ein Gerät deutscher Herstellung 
(Firma HIB). Der dataphon ist FTZ- 
zugelassen und kann Daten mit 
der üblichen Geschwindigkeit von 
300 Baud übertragen. Die Verbin- 
dung zum Apple erfolgt über eine 
V24-Standardschnittstelle wie bei 
dem AK 300. 

Akustisch dicht schließende Gum- 
mi-Manschetten zur Aufnahme 
von Sprech- und Hörmuschel des 
Telefons gewährleisten eine ein- 
wandfreie Verbindung. 


Trotz des niedrigen Preises bietet 
der Akustikkoppler einige Beson- 
derheiten, die sonst teureren Ge- 
räten vorbehalten sind, z.B. außer 
Answer- und Originate-Modus die 
Möglichkeit der automatischen Ka- 
nalwahl, die den Aufbau einer Ver- 
bindung auch dann ermöglicht, 
wenn nicht bekannt ist, in welchem 
Übertragungsmodus die Gegen- 
station arbeitet. Die Stromversor- 
gung (9-15V) erfolgt wahlweise 
über ein geregeltes Netzteil, Akku, 
Batterie oder über den Schnittstel- 
lenstecker vom Computer aus. Für 
den Apple Ii+, Ile (und |Ic?) hat 
HIB entsprechene Software er- 
stellt, 


Parallelportkarte für Apple Il 


Diese Karte der Firma Brecht ent- 
hält drei VIA Bausteine R6522. Es 
ergeben sich dadurch 60 TTL- 
kompatible Ein-/Ausgabeleitun- 
gen, davon sind 12 interruptfähig. 
Sechs 16-Bit-Timer für Impulser- 
zeugung, Zählen von Impulsen 
und Erzeugen von Verzögerungs- 
zeiten sowie drei Schieberegister 
lassen sich für die seriell-parallele 
bzw. parallel-serielle Wandlung 
verwenden. 

Durch die Vielseitigkeit der VIAs 
ergeben sich universelle Möglich- 
keiten. Durch Kombination mit Fil- 
ter- und Leistungskarten des glei- 
chen Herstellers kann der Apple II, 
II+, Ile oder Kompatible in der 
Steuerungstechnik oder z.B. der 
automatischen Qualitätskontrolle 
eingesetzt werden. 
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Die Karte kann in jedem Slot instal- 
liert werden, wobei die vergoldeten 
Kontakte eine optimale Sicherheit 
in der Kontaktgabe gewährleisten. 
Zum Anschluß der E/A-Leitungen 
stehen 60 Molexfingerkontakte zur 
Verfügung. 

Jeder Lieferung liegt eine Be- 
schreibung der Arbeitsweise der 
Karte bei, aus der die Konfigurie- 
rung und Anwendung der Register 
zu entnehmen ist. Außerdem er- 
hält der Käufer die (englischen) 
Datenblätter des VIA 6522. Der 
Preis der Karte beträgt knapp DM 
200, -. 

Vom gleichen Hersteller ist eine 
zweifach RS-232C-Schnittstelle 
mit EPROM/RAM ($CX00-$CXFF) 
und eine 16-Bit-A/D-Wandlerkarte 
für den Apple erhältlich. 
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Mit ausführlichen 
Programmbeispielen 






„Apple Assembler“ wendet sich an alle, 
die bereits Anfängerkenntnisse der 
6502-Programmierung haben und 
nunmehr ein Nachschlagewerk für 
ihren Apple Il Plus /lle/lic suchen, in 
dem alle wichtigen ROM-Routinen 
sowie eine Vielzahl sonstiger Hilfspro- 
gramme in einer systematischen Form 
zusammengestellt werden. Insgesamt 
umfaßt dieses Buch über 40 Utilities, 
darunter mehrere völlig neuartige Pro- 
gramme wie Double-Lores, Double- 
Hires, Screen-Format u. a. 


Der erste Teil enthält ein Repetitorium 
der wichtigsten Befehle, Adressie- 


rungsarten und sonstigen Besonderhei- 


ten des 6502 sowie Angaben zu den 
apple-spezifischen Zahlenformaten 
(Integer- und Fließkommazahlen). 

Im zweiten Teil werden neben einer 
Kurzwiederholung der Monitor-Befehle 
alle Routinen und Adressen des Moni- 
tors zusammengestellt, die für Assem- 
blerprogrammierer von Nutzen sein 
können. Darüber hinaus findet der 
Leser Unterroutinen für Vorwärts- und 
Rückwärts-Moven, hexadezimale Addi- 
tion /Subtraktion /Multiplikation /Divi- 
sion, Binär-, Hex-und ASCII- 


Ulrich Stiehl 


Be Apple Assembler 
ren, Aufwärts-Scrollen, Reset u.a. i 5 
Der dritte Teil befaßt sich mit der Spei- - Tips und Tricks - 
cherverwaltung der Language-Gard f 

von U. Stiehl 


und der Ile-64K-Karte und enthält Test- 
und Move-Programme zum Verschie- 
ben von Daten in die und aus der 
Language Card sowie der 64K-Karte, 
wobei besonders ausführlich auf die 
Softswitches eingegangen wird. 


Der vierte Teil ist dem Applesoft-ROM 
gewidmet und beschreibt die interne 
Struktur von Applesoft-Programmen, 
die Methoden der Parameterübergabe 
mittels CALL, USR, &, PEEK und POKE 
und listet dann eine große Anzahl nütz- 


232 S., 40 Programm-Listings, 
3 Abb., kart., DM 34,— 
ISBN 3-7785-1047-9 


Begleitdiskette zum Buch DM 28,— 
ISBN 3-7785-1048-7 


licher Interpreter-Adressen. Bei den ® : 
Utility-Programm liegt das Schwerge- Fr 
wicht auf Fließkommamathematik ein- ee 
schließlich Print Using. +” Se © 

Der letzte Teil behandelt den Text- und = RP 


Grafikspeicher. Neben einem profes- 
sionellen Maskengeneratorprogramm 
findet der Leser hier auch erstmals 
Routinen zur Double-Lores- und 

Double-Hires-Grafik des Apple Ile. 









Wir vertreten unter anderem 
folgende Firmen in Deutschland: 


WM PASSPORT PRODUCTS 
Vassan IG 
(Ö) THUNDERWARE, INC. QDUORUN 


24 Mountain Computer Inc. 


= Titq 


Illdal IMG. 








- 


INTRA COMPUTER INC. 


Ni! 
u 


K® nn E California Computer Systems 
COMPUTER STATION Cfstware inc 


Händleranfragen erwünscht. 


panday@ft Dr.-Ing. Eden 


Uhlandstraße 195 - 1000 Berlin 12 - Mo-Fr 10-18 Uhr, Sa 10-13 Uhr 
Telefon: 0 30/3104 23 - Telex: 185859 


CORVUS OMNIDRIVE” 


5, il. lo,odenr242 IVIB 
für Apple Macintosh. 
Single user Version* incl. Omninet-Transporter. 


Für Entfernungen bis zu 1 km, 
problemlos über RS 422 Zweidrahtleitung. 


CORVUS Omnidrive” 
Winchester Disk 


Omnidrive 
Massenspeicher und 
Netzwerkanschluß in 
einem Gerät. 





"ab 3. Quartal ’85 aufrüstbar für Multiuser-Betrieb zum 
Vernetzen von bis zu 63 Mac'’s. 





Omninet Constellation Il Multiuser Version für 
gemischten Betrieb von Apple II +, Ile, Corvus Concept, 
DEC Rainbow, TI Professional, Zenith Z 100 

IBM-PC sofort lieferbar 





Panday®&ft Dr.-Ing. Eden | 


Uhlandstraße 195 - 1000 Berlin 12 Mo-Fr 10-18 Uhr, Sa 10-13 Uhr 
Telefon: 0 30/31 04 23 - Telex: 185859 





Accelerator Ile macht 
Ihren Apple® Il, II Plus oder Ile 
dreieinhalbmal schneller. 


Jetzt laufen VisiCalc® Apple Writer, PASCAL, BASIC, 
Datenbanken usw. endlich ohne langen Zeitverlust. 
Stecken Sie einfach die ACCELERATOR Ile Karte 
in irgendeinen Slot und beobachten Sie, 
wir Ihr Apple loslegt! 

ACCELERATOR Ile besitzt seinen eigenen schnellen 
6502 Prozessor und 80 K-Byte Hochgeschwindigkeits- 
speicher, einschließlich einer eingebauten schnellen 
Sprachkarte und schnellem RAM-Speicherplatz für die 
ROM-Sprache. 

Direkt von Pandasoft (Titan Distributor für Deutschland) 
oder bei Ihrem Applehändler. 


Pandaye@ft Dr.-Ing. Eden 


Uhlandstraße 195 - 1000 Berlin 12 - Mo-Fr 10-18 Uhr, Sa 10-13 Uhr 
Telefon: 0 30/3104 23 - Telex: 185859 
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